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SOUNDSIGHT ANNOUNCES: 
MEGAMEMORY 


A NEW ERA IN RAM. 
128K to 


10 MEGABYTES 


RAM EXPANSION FOR THE TANDY 100 AND 102 COMPUTERS 


CREATES AND EDITS FILES AS LARGE AS THE AMOUNT OF RAM PURCHASED. FULL 10 x 
FUNCTIONS IN BASIC. FASTER, IN SOME APPS, THAN THE MODEL 100/102. OPTIONAL 4 PLACE 
ROM BANK. PARALLEL CPU BUS. TOTAL SIZE OF 1 MEGABYTE MODULE IS 1°X1.3°X3.5". DOES 

NOT COVER COMPUTER'S 1 O PORTS OR BATTERY COMPARTMENTS. 


INCREDIBLY SMALL! 128K is only 1/8"X1"X3.5" and plugs into the cpu bus. 


LIL LONG HAVE SONS SIS 
SLAB CHING FOR A wee. 
LISPAVISION OF THE WERE 
IDO” 702'5 CAPABALYT ES. 


I IL THERE IS MECRNERERA. 


Utilizing the same proven operating system software SoundSight placed in Standard Oil Service 
Stations from Alaska to Florida, MEGAMEMORY now offers FULL TEXT EDITING of files 
of any size existing in the RAM bank. *Text Editor Priced at $75.00 


Currently The advantage of our widely 
undergoing tests for 


usé "iy. Que. LA! Chi used operating system lies not 
Sheriff's Dept, only in providing the first 
Megamemory also Text Editor accomodating 
offers 3rd Party REA model 100/102 files greater 
Development,(C See $ than 32k, but in our coming 
language), POS ; support software which 
systems and "^ Mod includes the Text Editor, 


Vertical Market s Spreadsheet, and Database. 
Applications. 


PRICES: 128K-$329.00, 256K-$529.00, 384K-$625.00, 
512K-$699.00. 640K-$769.00, 768K-$839.00. 896K-$899.00, 
1 MEGABYTE-$965.00. 


Additional memory prices available up to ]0 megabytes in bottom mounted RAM pan. All RAM bank 
modules are actual byte sizes listed and do not include the Model 100 or 102's RAM. 
CONTACT: 


SOUNDSIGHT MBM INC. 225 W. Broadway, Suite 509, Glendale, CA., 91204 Ph (818) 240-8400 
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ROM WITH A VIEW 


The Choice 


is Yours 


This is the fourth issue of the revitalized Portable 100. Letters 

keep pouring in from readers who are glad to have their 

magazine back. One of the keys to Portable 100’s popularity is 

its technical content. Maintaining vigilance in all things tech- 

nical for the past couple of years has been Alan Zeichick. Alan 
is now working full-time here in Peterborough, and we thought you’d like to 
hear a few words from him. Alan... 

“I talked with a young man yesterday, a third-year computer-science student 
at a midwestern university. He called looking for advice—which computer 
should he buy? He wanted a portable and he wanted to buy from Radio 
Shack (despite the fact that he could get huge discounts on IBM and Zenith 
through his university). The Tandy 102 is affordable, but limited; the 200's 
not much better. The 600 is on sale, but obviously a dead-end. And, the new 
Tandy 1400 LT is appealing because of its power and IBM compatibility, but 
the price is steep for a college student. 

“It was a difficult question. A year ago, six months ago, I would have 
recommended the Tandy 102 as a good, general-purpose notebook computer; 
but with the MS-DOS standard firmly entrenched, the 1400 LT offered the 
most promise, especially for a bright computer-science major. 

“When the Model 100 was introduced, it gave the most bang for the buck. 
At Portable 100, we bragged about its built-in screen, handy modem, com- 
munication ports, full-sized keyboard. Compared to the Compaq Portable, 
Kaypro IV, and PCjr, it was quite a deal. 

“But the world changed. The Traveling Writer spawned the Ultimate ROM 
II, but Visicale and WordStar inspired such stars as Lotus 1-2-3 Release 2, 
dBase II+, MultiMate Advantage and Aldus Pagemaker. And, a 1,200-bps 
modem card for an IBM PC is available for less than $100. 

“In a world of personal laser printers, 3Com networks, hard disks and CD- 
ROM (compact disc, read-only memory), how can the Model 100-family laptop 
survive? 

“The way it always has—as a specialty, niche product. No, the Tandy 102 
is probably not the best computer for the technically-minded college student, 
or for home education, or even for the average hobbyist. You'll find, and 
Portable 100 will cover, those applications that the Model 100 shines at: 
journalism, field instrumentation, device controlling. Wherever the 1400 LT is 
overkill, or IBM compatibility is a handicap, you'll find a Model 100. 

"The computer industry is constantly changing. That's not a surprise, but 
what is surprising is how responsive Tandy is to those needs. Unlike Epson 
America, for example, which abandoned its proprietary Valdocs computers in 
favor of its IBM clone, Tandy still supports its older machines while concen- 
trating on its newer models. And like Compaq, Tandy's machines aren't simple 
copies of the competition, but new models in their own right. Tandy continues 
to set its own trends." 

That said, let's get on with the magazine. 


Roger Strukhoff, Editor 





ll) 


Rebirth of a Classic 


lad to have you back. The 

new Portable 100 came in 

just as my Model 100 was 

reborn by Traveling Soft- 

ware's Ultimate ROM II with the 60- 

character display. Wow! I abandoned 

the little guy years ago when serious 

work required more than 40 char- 

acters. Many thousands of dollars of 

laptops followed. If only Tandy would 

offer an 80-character option, they 
would consume the market. 

Other wonderful things: ortho rub- 


ber bands plus Merrit Computer’s 
SafeSkin keyboard protector. Totally 
quiet and sealed against dirt, too. PG 
Design’s RAM bank: three banks of 
32K is heaven, and battery life is fine. 
Finally nicad conversion. Works 
great. 

My Model 100 is again my constant 
companion. Now if only I could tuck 
in a cold beer dispenser... . 

Albert R. Karel 
Los Angeles, CA 


DON’T FORGET THE TECHIES 

Just a line to let you know how 
pleased I was to receive my copy of 
Portable 100. Frankly, I never ex- 
pected to see this magazine again! I 


Do you have any questions, suggestions, 


considered Portable 100 to be one of 
the best magazines delivered to my 
door each month, and there are 
many to which I subscribe. 

In the September issue's editorial, 
you discussed some future articles, 
and one of those mentioned is the 
capability of using a monitor with the 
Model 100. Many of us are looking 
forward to that article. Of course, 
that capability is expensive and re- 
quires a disk drive that I do not want 
or need. The Model 100 owners here 
are anxiously awaiting that article. 

I think there has been some hesi- 
tation to include articles that are very 
technical in nature, perhaps feeling 
that the average reader will not un- 
derstand. This is especially true of 
electronic articles that require knowl- 
edge of schematic diagrams and con- 
struction techniques. Please don't 
hold these articles back because there 
are many of us that do have technical 





news or commentary? Don't be shy — send 
your article ideas to the Editor at 80 Elm St., 
Peterborough, NH 03458. 


backgrounds. And if the subject is 
useful to those who have not, we can 
help with the conversions and mod- 
ifications. But if we don't have those 
oO articles, many useful changes to the 

^as Model 100 might never be known. 
I have converted my Model 100 to 
rechargeable batteries such as sug- 
gested in your August 1987 issue. The 
only difference is that I used a diode 
in conjunction with the resistor to 
\ prevent unwanted discharge of the 
cells. It works fine and sure does save 

on battery purchases. 

Many of the ham, or amateur radio 
operators in this area are using the 
Model 100 for digital modes of com- 
munication, including radio teletype, 
Morse and the new packet commu- 
nications mode. Ham communica- 
tions requires that we both listen and 
then transmit, but we can’t do both 
at the same time as we can with a 
telephone modem-—so conventional 
communications software isn’t very 
good for our purposes. 

We have been trying to find a split- 
screen terminal program to solve our 
problem. A split-screen communica- 
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USE YOUR DESKTOP COMPUTER AS A 
DISK DRIVE FOR YOUR M-100. 


on Snap-In "ROM 





Try Disk + for 30 days. If you aren't as 
excited as we are, return it for a full refund. 





When we designed Disk + we did it out 
of necessity. We wanted a way that we 
could just connect a Model 100 to our 
desktop computer with a cable and save 
files onto the desktop's disk drive. We 
wanted it to be so simple to use it would 
be self-explanatory. 

Picture this. Disk-- comes to you on a 
Snap-in ROM and a diskette for your 
desktop. You take a quarter and open the 
little compartment on the back of your 
Model 100. Then you just press the ROM 
into the socket. Disk -- appears on your 
main menu just like a built-in. 

You connect your Model 100 to your 
other computer using an RS232 cable 
(available from PCSG for $40). 

You just place the Disk+ diskette into 
the desktop's drive and turn on the com- 
puter. It powers up automatically and says 
"awaiting command" on your desktop's 
screen. Then you just put the widebar 
cursor on the Model 100 main menu on 
Disk + and press ENTER. You are shown 
your RAM files arranged just like the main 
menu. 

To save a file to your other system's 
disk drive, you just move the widebar cur- 
sor to the file you want to save and press 
ENTER. It is saved instantly with no 
further action. 

To look at the disk directory, you just 
press a function key on your Model 100. 
You see immediately the disk directory on 
your Model 100 screen, and it is arranged 
just like your Model 100's main menu. 

To load a file from the diskette to your 
Model 100, you just move the widebar 
cursor to the file and press ENTER. The 
file is transferred to your Model 100's RAM 
instantly. You can press F8 and go back to 
the main menu, and the file you loaded 
from diskette is there, ready to use. 


It is so nice to be able to keep your 
documents, programs (both BASIC and 
machine code) and Lucid spreadsheet 
files on the diskette, and bring them back 
when you need them. All files are ready 
to run or use with no changes or protocol 
by you. 


If you have access to a desk- 


top computer and don't 
have Disk + , then evidently 
we have done a poor job 
telling you about it. 


All files and programs that you load or 
save, go over and come back exactly as 
they are supposed to be because of full 
error checking. This guaranteed integrity 
is really a comfort. Disk + is wonderful in 
so many other ways. For example, you 
can do a “save all” of all your RAM files 
with just a touch of a function key. That 
group of files is saved on the diskette 
under a single filename with a .SD (for 
subdirectory) extension. Any time you 
want, you can bring back all those files at 
once, or just one or two if you like, again 
with one-button ease. 

Disk+ takes up no RAM. That's zero 
bytes either for storing the program or for 
operating overhead. 

What really excites most Disk+ users 
is text file cross compatibility. Your Model 
100's text files are usable on your desktop 
computer, and your desktop' text files 
become Model 100 text files. 

This means you can write something on 
your Model 100, and with Disk + transfer it 


1-214-351-0564 











instantly to your desktop and start using it 
right away on your bigger computer. Or 
the way we like to work is to type in a 
document on the desktop computer and 
then transfer it to our Model 100 with 
Disk +. Then we print out the document, 
beautifully formatted, using WRITE ROM. 

Disk+ works with just about every 
micro sold, from IBM PC and its clones, to 
all Radio Shack computers (yes, all), to 
Apple Il, Kaypro, Epson and most CPM. 
Just ask us. More than likely, your comput- 
er is supported. 

Incidentally, hundreds of Model 100 
owners have gone to their Radio Shack 
stores and bought a color computer be- 
cause it is so low priced, and with Disk + 
they have an inexpensive disk drive. 

And if that weren't enough, how about 
this: Disk + also provides cross-compati- 
bility between different computers like 
IBM, Apple or the Model 4 using the Model 
100 as the intermediary device. Quite a 
feature! 

The snap-in ROM is really great be- 
cause you can use other ROMs like Lucid 
or WRITE ROM. They snap in and out as 
easily as an Atari game cartridge and you 
never lose your files in RAM. 

Anyone who ever uses Disk+ simply 
can't do without it. But so many times we 
have had new users call us and say, 
"Wow! | had no idea when | ordered it that 
Disk+ would be so fantastic. | just 
couldn't believe that | could use my 
desktop computer's disk drive with my 
Model 100 just like it is another main 
menu." 

That's why we sell Disk+ on a thirty- 
day trial. If you aren't completely satisfied, 
return it within thirty days for a full refund. 
Priced at $149.95 on Snap-in ROM. Mas- 
terCard, Visa or COD. 


PORTABLE GOMRUTER SURORT ORCUP 


11035 Harry Hines Blvd., #207, Dallas, Texas 75229 * 1(214) 351-0564 
PCSG provides hotline software support for the Model 100. Call us at 1-214-351-0564 
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tions program would allow us to type 
answers to incoming data into a 
buffer. When it is our turn to trans- 
mit, the information can be sent. The 
split screen normally consists of two 
sections, separated by a horizontal 
line. The bottom section contains the 
outgoing information, perhaps only 
one or two lines, which would scroll 
to make room for new data. We've 
not been able to find such a program 
for the Model 100, though such soft- 
ware for other computers does exist. 
Can you help? 




























James Parsons 
San Angelo, TX 


We've never seen a Model 100 com- 
munications program such as you de- 
scribed. If any reader or amateur radio 
enthusiast can offer assistance, please 
drop a line to the Editor of Portable 
100. -Ed. 


JERKY INTERPRETER 
REVISITED 

Regarding the question in August's 
I/O column, regarding BASIC pro- 
grams sometimes locking up for a 
short time, I have a suggestion. 

This has been a problem with Mi- 
crosoft’s interpreted BASICs for years, 
since, because of dynamic string mem- 
ory allocation, BASIC will sometimes 
pause execution of a program in order 
to clean up the string space, a process 
known as "garbage collection." This 
activity will occur at various times 
within the running of a BASIC pro- 
gram, depending on such factors as 
the number and total length of string 
variables, activity of those variables, 
and the total rainfall in Washington 
state. 

The only real way I've found to 
handle the garbage collection prob- 
lem is to force a clean-up when con- 
venient for me. This can be accom- 
plished by executing a FRE(A$) at a 
point in the program where you want 
to force garbage collection. If the 
string clean-up is forced often 
enough, it takes less time and won’t 
occur at undesirable moments, such 
as during an input routine. 

John J. Genzano, III 
West Chester, PA 


A SHIFTY GARBAGE 
COLLECTOR 

In the August 1987 I/O column, a 
reader asked why BASIC programs 
with many variables or large arrays 


















































































sometimes appear to freeze when he 
is entering data. You responded with 
some good suggestions, but I suspect 
his problem is caused by one of two 
aspects of the way Microsoft BASIC 
works: variable shifting and garbage 
collection. 

Numeric variables are stored in the 
free memory just above the text of 
the BASIC program. Simple variables 
are stored first, followed by array 
variables. When you dimension an 
array you allocate space for it in the 
lowest available memory. If you then 
introduce a new variable, it is added 
to the end of the current simple vari- 
ables and any existing arrays are 
moved higher in memory to make 
room for it. This takes time—partic- 
ularly for large arrays. But it can be 
avoided entirely by initializing all sim- 
ple variables before dimensioning ar- 
rays. You could assign values to each 
of them, but the best way is to di- 
mension them (yes, you can dimen- 
sion simple variables). For example, 

DIM AL,B,C,EX,EY,1LJ,K,IN$,D$ 
creates these variables, assigning zero 
to the numeric ones and nulls to 
string variables. As a side benefit, all 
the variables are listed near the top, 
so you know what’s already in use 
when you want to add more. You 
should perform any variable type def- 
initions first (such as DEFINT L-K) so 
that the variables will be created with 
the proper sizes. Listing the most-used 
variables first yields a minor speed 
adjustment, since BASIC searches for 
them in order. 

When you dimension a string, you 
really create a pointer to the actual 
string. The string itself may be within 
the program (in a data statement or 
as a string literal), or it may be in 
the "string space" between the end 
of the highest array and the top of 
available memory. The size of string 
space is set with the CLEAR com- 
mand; the default is 256 bytes on the 
Model 100. If you assign a new value 
to a string already in string space, 
the new value is placed in the unused 
area, and the old one is abandoned. 
The latter is still there—but there's 
no pointer to it. When string space 
becomes full, BASIC does garbage 
collection to consolidate the strings 
and to get rid of any strings in string 
space that no longer have a pointer 
addressing them. The time taken by 
the garbage collection depends on the 






CORRECTION | 








length of the active strings, not on 
the dead ones. 

There is no complete cure for gar- 
bage collection. Programs were de- 
veloped for the old TRS-80 Model I 
and other computers to speed it up 
with a faster collection algorithm, but 
I don't know if any are available for 
the Model 100. By increasing the size 
of string space you can delay the 
inevitable. The FRE function with a 
string argument forces garbage collec- 
tion, so you can make it happen at 
a more convenient time. 

If you do a lot of string swapping 
(common in sorting routines), you 
can swap the pointers instead. Or if 
the strings are in an array, you can 
set up an integer array as pointers to 
the string array and use an indexed 
sort method; you can have as many 
sorted versions of the same string ar- 
ray as you want. 

Everett Ogden 
Delmar, NY 


THE PAUSE THAT ANNOYS 

Welcome back! I’m looking forward 
to the new Portable 100. The content 
has always been good; hopefully, de- 
livery will now be equally good. 

I noted a letter in the August issue 
regarding the annoying pauses which 
often occur when typing in data 
when running BASIC programs. In 
addition to the techniques mentioned 
in the reply, another possible solution 
is to increase the amount of string 
space. This is because the pauses are 
often caused by the computer doing 
housework, rearranging strings. The 
more string space there is, the less 
housekeeping there is to do. For ex- 
ample, if the beginning of the pro- 
gram has a CLEAR 1000 statement, 
try CLEAR 2000. 

Since that increases the amount of 
RAM the program requires to run, 
it might not always be practical. 

Neil Smith 
Seattle, WA 





Portable 100 ran two items in the Au- 


; gust issue concerning, products from | 


Portable» Computer ‘ Support. Group. 


' One item concerned carrying cases, the 
/other'a product called the Business An- 
: alyst: These products are; in fact, no 
longer available from PCSG and were 


not available when the August. issue 


-was published through. no. fault. of 


PCSG. Portable 100 regrets the error. 
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EXPANSIONS!!! 





MODEL 100/NEC PC-8201A 
8K Memory Module 

$23—three or more $19 ea. 

Easy to install. Open the case and plug- 
them-in. Each module expands your 
memory by 8K bytes. Extra low power 
components mean long battery life. Very 
low profile means a proper fit in the 
NEC PC-8201A. Detailed instructions 
make installation quick and easy. You can 
expand your Model 100 to 32K and your 
PC-8201 to 64K (2 banks of 32K each). 


NEW!!! 

MODEL 102 

8K Memory Module 
only $9.95 


Easy to install. Just open the hatch 
and plug it in. 





TANDY 200 
24K Memory Module 
$65—two for $59 ea. 


Simply pop open the hatch with a coin 
and plug in one or two of these modules. 
Each module adds a 24K bank of 
memory to the TANDY 200. It's like 
getting two more machines. The built in 
COPY function key copies files between 
banks instantly. Like our 8K, we build 
these with the lowest power and most 
reliable memory chips available. 


THE PURPLE POLICY 

Try any of our products for 30 days, 
satisfy yourself that our service, quality, 
and prices add up to the best value 
anywhere—if not completely satisfied, 


you can return the product for a full 
refund. Prices include UPS surface 
shipping (in Continental USA)—even the 
phone call is free. 


30-day money-back guarantee. 


IT'S EASY TO ORDER 

Send your order with payment to the 
address below. Or, if you prefer, credit 
card orders can be handled by 
phone— VISA, MasterCard, and 
American Express are welcome. 
California residents add 696 sales tax. 
Checks allow 3 weeks to clear. 


1-800-732-5012 TOLL FREE 
Orders only (8am—5pm PST) 


(805) 987-4788 In California 

For orders or customer service 
m PURPLE 
l4 COMPUTING 


420 Constitution Ave. 
Camarillo, CA 93010 


Telex: 888661 (PURPLE) 


Canada: Canada Portable Computer, (604) 534-6441 
Australia: Softech Computer Services, (2) 419-8899 








PORTABLE PRINTING 





F 
MADE FOR TRAVEL 

SIZE and WEIGHT are the most 
important considerations when going 
portable. This printer is half the size of 
the Model-102 and weighs only 2.2 lbs. 


RUGGED 

Because it's thermal, there are no 
ribbons, no ink, no pins to wear out or 
replace, all you need to take with you 
is paper. 


30-DAY MONEY-BACK 
GUARANTEE 


m 


IU FEATURES 


e 2.2 Ibs., size 11” x 4%" x 14". 

* Epson MX/80 bit-map. graphics. 

* Built-in auto self test function. 

* 81⁄2” wide thermal paper. 

* Excellent User's Manual. 

* 40/80/160 chars./line, 40 chars./sec. 
* 512 byte text buffer. 


CACTUAL print sample» 
86 Chars-Line, 468 CPS! 
Enlaraecac! 
underlined Emphasized! 
CONDENSED gives you 168 chars. per line! 


$99 GRAND TOTAL 

Includes a 20' roll of paper, four *C" 
batteries, and a custom-made 18" cable 
for your computer's parallel printer port. 
(Please specify computer make and 
model.) You get everything you need to 
start printing immediately! 


IT'S EASY TO ORDER 

Send your order with payment to the 
address below. Or, if you prefer, credit 
card orders can be handled by 
phone— VISA, MasterCard, and 
American Express are welcome. 
California residents add 696 sales tax. 
Checks allow 3 weeks to clear. 


1-800-732-5012 TOLL FREE 
Orders only (8am—5pm PST) 
(805) 987-4788 In California 
For orders or customer service 
m» PURPLE 
Cad COMPUTING 
420 Constitution Ave. 
Camarillo, CA 93010 
Telex: 888661 (PURPLE) 


Canada: Canada Portable Computer, (604) 534-6441 
Australia: Softech Computer Services, (2) 419-8899 
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Inde with. per ROM. 
and the Model 100 


dese à writer 5 ‘delight: a teehee baited word “processed v version 


tł TH ria 
f 





puter's word. processing’ capabilities 


and its ability to sort lists; it seemed. | 
‘reasonable to ‘expect’ the computer - 
|- would also ease indexing: pains, but 
as I soon discovered, sorting programs T: 


and even the indexing capabilities of - 


By Robert S: Dupree. iii 


ew FENA are more tedious! ud 
| prone. to error than book in- - 
Y dexing. I remember looking , 
: foward to the. personal com- 


' isome advanced, word prbfessing pro-. re 


ji lir for. Dese fon 


FF ti] * $3 Í 


"i ? į T. 


kidd | ad HEN to fid Tn 

(Even so, they are better than.a type- 

writer and index cards!) 
My life as a writer chágged | dras- 


tically, however, when | acquired a 


Model 100. 1 conducted library: re- 


search: and took notes with: unprec-. 


' edented efficiency. I could cut; and 
“paste. notes from one file to another, 


"replicate bibliographical entries from. 


my library references and copy them 
to my 


final printed text, and avoid the. 
|. frustration of ‘retyping and: the inevi- | 
fi j table errors that come with it. 

` The indexing problem; however, re- 
`| mains. “Since the Model 100; can’ be 


used almost anywhere for short spurts 


of typing (for instance, while waiting 


: in the doctor's office or even in the 


carpool), it relieves some of the te- 
dium of entering indexed items. But 


' | knew if a program could be devised 
that would facilitate index editing 


after the list of items and page num- 


bers had been typed in, the Model 


100 would be an indispensable 
companion. 

Word processing programs with in- 
dexing features can create a list of 


. designated words and the page num- 
‘bers on which they occur, but they 


are set up to index a typescript rather 
than a printed book. Writers cannot 


T begin indexing until they receive the 
page HH which. show the typeset 
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text divided exactly as it will appear 
from the first to the last page. The. 
: word processor, can’t help with this- 


sét ones. 

An alternative, however, is avail- | 
able thanks to PCSO. I have worked. - 
out the following procedure, using © 
their. Super. ROM, to produce a. 
ready-to-typeset index from page ` 
proofs. Since I send my ASCII files. - 


directly to a typesetting ' machine’ | 


and correct, are reduced because basic | ` 
entries are typed in only once... 


THE RECIPE | 


Faced with an impending deadline : 


(most indexing must be squeezed in 
at a critical point in book produc- 


tion), I made a copy of my page | 


l4 
" 
E 
t 


proofs and, using a felt-tip highlight-- 
ing pen, marked the words I wanted’ ~ 
indexed. The list was ready to be - 
typed. into the computer. $ 

Here's how you can enter your own: 
index by using the Lucid Database. 
and Write programs: 


First, make up an entry form like. f 


the following and call it INDEX.DO: . _ 
item:[a#] page:[b#] Create a file using | 


` Lucid: Database (four. on the Super | | 
menu) and the INDEX.DO view - 


| Figure 1. The author's sample program shows the index without leading zeroes. | | 
task because the original typescript | - THHHIBHHHHHH 
| pages do not correspond with the type- | | 





beauty nervous system 











prosody 59 muscle 63 
metaphysics 39 adolescent 63 
energy n" Physiognomy 63 
muscle 59 action 63 
destiny 59 neck 63 
Raymond, Marcel 59 school 63 
cause, formal 59 psychology 63 
cause, poetic 59 aggression 63 

















HHIHH LIE 









TIT LIT : 
e S TREE Ge qe TE 


lactión?: 42. - 


m a S 
| — action © yd C EL 


ces a4) LNCUIODE R ADL OES 
/5/5...adolescené3 | 3 
(5552 detheticóB To 
!*24 mesthetitoó +6 24.0) 
i) aggressioas i 55 ^7 
| amacoluth66 

Reli Pe 
Ou i UM 
i " 


Se 


OC RE ES te 
RUM. ; 
A 
we 
E 
S 
i 





LIEGE r Ee N 
Figure 2. An: example of a’ .DO file in two column format, | 
ITI ry Seegees PEST CERES eT ee eee į 


action 62; action 4&3, action 
66, adolescenó3. aestheticé@, 
aestheticóó,. aggressioó3, 
anacoluth66, animal 66, VEMM 
 animalituól, animalituó2, beauty © 
60, beauty 59, cause, fo59,. 
cause, po59, Cheseldenó5, child 
(64; child 63, child ói; 
 corresponéZ, cry 655 cru 











Figure 3. Use Lucid Write and the Fl. key to. replace ‘all. carriage retums with a comma 
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Prices apply at Radio Shack Computer Centers and participating stores 
and dealers. Batteries not included. 
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Tandy Computer 
Accessories: 
Because there is 
no better value.” 


Tandy Portable Disk Drive 


The ultimate storage 
solution for your 
Tandy portable. 


If you’re like most Tandy 100, 102 or 200 
owners, you’ve probably found more uses 
than you ever imagined. But where do you 
keep all those great programs? Up until 
now, it’s probably been on cassettes—a lot 
of cassettes. Now there’s a better way. 


Our battery-powered 200K Portable Disk 
Drive gives you fast access to 200,000 char- 
acters of data on a 34/2” micro floppy disk- 
ette. With your Tandy portable’s built-in 
software, you can create and update large 
documents on easy-to-store microdisks. 
Now you can build your own software and 
data library in a cost-effective manner. The 
microdiskettes are only $13.95 for a pack- 
age of 3, and cost even less when you buy 
in quantity. 


Come to your local Radio Shack and see 
the 200K Portable Disk Drive—only 
$199.95. (26-3814). 


EER EEN HESS TEER EEN MIN E EIER 
et 


7' Send meaneW = Name ië 

® 1988 computer xc 

‘> Catalog. Asdres$ ool + 

= City SS Ee. 

* Mail To: Radio Shack PT 
Dept. 88-A-1126 SM —— ———— 
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Ei Fort Worth, X76102 zp — à hà^PG—É1 0 [l3 
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A DIVISION OF TANDY CORPORATION 





INDEXING 


screen. Type in each item at the "item" 
prompt and push the Enter key twice. 
The first time you index a page, type 
in the page number and push Enter. 
Push F4 ("next"). For each successive 
item on that page, push F2 (“dupe”) 
and then F4. 

After you've recorded all the items 
on the page, go on to the first item 
on the next page and push Enter 
twice. Remember to type in the new 
page number instead of pushing F2. 
For the remaining items, push F2 to 
enter the same page number. 

To avoid having to type in leading 
zeroes (001,023 and so on) so that 
the numbers are sorted as, for ex- 
ample, 1, 8, 33, 57 instead of 1, 33, 
57, 8, use the B column for integer 
or whole number entries. Simply use 
the "display" function to eliminate 
the decimal point and two trailing 
zeroes (this can be done after you've 
entered all the items). 

Next, push F7 ("sel"), then the pe- 
riod (“.”), and then Ctrl-Z to set the 
range. Push Enter and then FI 
(“DISP”). The bottom line will change 
and you can then select F2 (“*.**”), 
delete the number using the back- 
space, and type in a zero (“0”). The 
decimal point and two zeroes follow- 
ing it will disappear, leaving you with 
integers (see pre-sorted example in 


Fig. 1). 


SORRY, OUT-OF-ORDER 

The early version of Super ROM 
could not sort on more than one key. 
Later versions can sort on two keys. 
If you have not yet returned your 
chip to PCSG for an update, you will 
need to make two passes. Since you 
do not have a secondary key sort, 
you must scan the B column for out- 
of-order numbers. 

To sort page numbers belonging to 
the same entry, move the cursor to 
the entry's first page number, press 
the period key (“.”), and use the down 
arrow to highlight the entire list of 
numbers for that entry. Press Enter 
and then F7 ("sort"). The bottom line 
will change again. Press F5 ("key") 
and make sure a number in the B 
column is entered. (B1 is OK and can 
remain for the entire secondary sort- 
ing session because you will be sorting 
exclusively in column B.) 

For subsequent secondary page 
number sorting, move down the col- 
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umn to the next item with multiple 
page numbers and repeat the process. 
You no longer need to change the 
key—just press F7 ("sort"), then F6 
(“go”), When the secondary sorting 
is done, you are ready to paste your 
index into a .DO file for editing. 
For future reference, print out the 
completed index. Set the A column 
at a width large enough to print out 
the longest entries, and set the B 


Yopographicdl 
errors, which 
are so difficult 

to spot and 
correct, are 


reduced because 


basic entries are 
typed in only 


once. 


column to a width of three. This 
procedure will save you time later. 
When the entire index is printed out 
(in two columns, if you wish, by using 
the designated feature in the Lucid 
Data program), change column A 
back to nine spaces wide. You're now 
ready to edit. 

First, paste a copy of the index into 
a text file with the A column width 
set at nine and the B column at three. 
Letters at the end of longer words 
will drop off the screen, but the 
printed copy will show them, and 
they can be added later. It is easier 
to add a few letters than to backspace 
and delete many blank spaces in the 
text. 


TEXT-CLEANING 

You now have a .DO file in two 
columns (Fig. 2). Using Write and the 
Rplc function (FI), search and replace 
all carriage returns with a comma fol- 
lowed by a single space (Fig. 3). Rep- 
etitions of the key word must be 
removed, but this text-cleaning is 
easy. 


To delete the word, type it in by 
using the Rplc function. Include 
enough spaces for a total of nine 
characters; this will delete any trailing 
spaces after the word. Press F8 and 
then replace with a null string by 
pressing F8 again after the prompt. 
When the prompt asks if you wish 
to confirm each replacement, type “y” 
and then “n” for the first entry (since 
that will be the indentifying word at 
the left of the column). Type “y” for 
all other entries until the filename 
returns (Fig. 4). Go through the text 
and put in carriage returns, delete 
commas after the last numbers in 
each entry, and clean up the text 
where needed. 

For the final edit, I find it conven- 
ient to use the Ctrl-D and Ctrl-F com- 
binations (moving the cursor one 
space or one word to the right). My 
left hand manages these keys and my 
right hand operates the Del/Bksp and 
Enter keys. I can go through the text 
(Fig. 4) in short order. 

Ctrl-f places the cursor at the first 
character of the page number or next 
item. I can then backspace to erase 
the intervening blanks or to remove 
the spaces and comma after the last 
page number. A carriage return sends 
the next item to another line. In 
other words, when you're faced with 
a line like: 

deafness 65, destiny 59, dream 
use Ctrl f to skip the cursor over to 
the "d" in "destiny," backspace to 
erase the space and the comma, and 
then hit Enter. You can do it without 
lifting either hand off its respective 
keys (see Fig. 5, the edited index). 

Only 250 items will fit in a file. If 
your index requires more, stop en- 
tering, mark the place in the text, 
sort the file, and divide it up into 
independent files (A-G, H-N, O-Z, for 
instance). Then, start a new file and 
begin entering where you left off. 
When you've typed in items from the 
second section of the text, sort your 
new file and cut and paste A-G, H- 
N, OZ into the three sections you 
created earlier. Sort each of them 
again, and continue. 

You should end up with a series of 
files, each completely sorted and di- 
vided into alphabetically ordered seg- 
ments. When you've completed the 
editing, you can join the segments as 
text files. 
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TANDY 600 













A guide 
for the perplexed. 





By Stephen Schenkel 





The Tandy 600's File: 


icrosoft did a good job 

on the Tandy 600's 

ROM-based applications. 

The programs are com- 
prehensive and are wellintegrated. 
One of these, File, is Microsoft's an- 
swer to the need for a portable da- 
tabase. It's easy to use, but like many 
laptop software products, File has 
quirks, limitations, and inconsisten- 
cies. Some of them can be beaten, 
others can be worked around, and 
many must simply be accepted. Let's 
take a look at some of them. 


















SELECTION KEYS 

Like the older Tandy laptops, the 
Tandy 600 uses what its manual calls 
“selection keys,” used to cut, paste 
and copy information. In a word proc- 
essor, these keys manipulate letters, 
words and sentences; in File, they 
mark records and fields. 

A. primer on database terminology: 
think of a database as a collection of 
Rolodex-style addresses. Fields are 
pieces of information, such as name 
and telephone numbers, that are 
filled in for every person in the Ro- 
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lodex. Records are a collection of 
fields specific to one individual, such 
as Jane Doe's name, address and 
phone number. A database is a col- 
lection of records, such as a list of 
all company employees. The Tandy 
600 uses a spreadsheet analogy calling 
fields columns, and records rows. 

By default, File works on one rec- 
ord at a time—the record that is al- 
ways in reverse video on the screen. 
Thus, there is always at least one 
record selected, called the cursor rec- 
ord. To select additional records, to 
print perhaps, press Shift-F8 to select 
a column, Shift-F9 to select a row, or 
Shift-F10 to select the entire database. 
A row may also be selected by press- 
ing the left arrow with the cursor in 
the first column. 

The selected area can be extended 
with F6. Pressing this key once turns 
the extension on; pressing it again 
removes the extension, and the pre- 
viously selected area reverts to normal 
video. 


CONTROL RECORDS 

File’s control records are contained 
in the four labeled rows at the top 
of the database. Their function is 
fairly well-explained in the manual, 
but their use can be expanded. 

The first of these control rows, the 
ID row, contains data identifying in- 
formation stored in each column. 
This is the one row of the database 
that is always on the screen, no mat- 
ter where in the database the cursor 
is. This data is used by the Lookup 
and Jump commands to determine 
where to lookup or jump; therefore, 
the ID for each field should be descrip- 
tive and not contain duplications. 

This ID row can also store notes 
after the formal label for each col- 
umn. Each field can hold as many 
as 230 characters, but the value given 
in the FORM row determines the 
number of characters actually dis- 
played on the screen. If, for example, 
the FORM row specifies 13 charac- 
ters, the remaining 217 can be used 
for hidden notes. 

The FORM row is more complex, 
determining the width of each col- 
umn and the format of its informa- 
tion. There are column formats: day/ 
date, number and text. The use of 
boilerplates determine column for- 
mat. Note that each record can store 
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as many as 230 characters, while 74 
characters is File’s maximum screen 
width. 

Boilerplates are useful for setting up 
data entry as they allow various ways 
of entering data: quick data entry of 
repetitive data, consistent use of dec- 
imal points, dates and times formats, 
and currency formats. A good ex- 
ample of boilerplate use is a telephone 
number column. A boilerplate of 
(AAA) AAA-AAAA allows the num- 
ber to be entered in various forms, 


When 
defining the 
FIND records, 
keep in mind 
the difference 
between 
absolute and 
non-exact 
references. 


with or without the hyphen and pa- 
rentheses. The capital “A” indicates 
a text character. 

Boilerplates can also be used to set 
up printer control features. To under- 
line fields when printing, set the first 
character in the appropriate FORM 
column to the underlineon com- 
mand for your printer—ASCII 15 on 
my Tandy DMP-105—and the char- 
acter to the underline-off code, in my 
case ASCII 14. The same principle 
applies for other special characters or 
print styles such as double-width, 
italic or bold. 

One warning about boilerplates: 
the pound sign (#) indicates a digit, 
and should not be used in conjunc- 
tion with text characters. Any text 
characters entered will be treated as 
additional boilerplates with no special 
meanings. Also, a FORM of -#### 
does not treat a number entered as 
a negative; rather, File assumes the 
hyphen in a telephone number. Neg- 
ative numbers can only be indicated 
by entering them when entering data. 

The next control row, SORT, can 


be very useful. You should realize, 
though, that not all databases are 
meant for sorting. A database for 
storing research notes probably can- 
not be sensibly ordered, while an ad- 
dress database should be sorted by 
last name. Be careful: File sorts by 
using the ASCII character sequence. 
This means, for example, that a cap- 
ital M (ASCII 77) is sorted before the 
lower-case a (ASCII 97). And to sort 
numbers properly, they must be de- 
fined in their column's FORM rec- 
ord, otherwise 121 (ASCII 49, 50, 49) 
will be considered less than 35 (ASCII 
51, 53). Be patient with SORT; it’s 
not the world’s fastest, most notably 
with a database containing more than 
50 rows. 

The fifth, and final, control record 
is FIND, which allows the File pro- 
gram to search the database for rows 
containing specified information. 
When defining the FIND records, 
keep in mind the difference between 
absolute and non-exact references. 
Absolute references are contained in 
quotation marks and mean just that: 
FIND everything that’s exactly like 
this example. Non-exact references, 
on the other hand, are not so de- 
manding, particularly in that they 
don’t notice any difference between 
upper and lower-case. 

FIND is by no means limited to 
one item. Multiple search criteria can 
be entered in the same row, and File 
will come up with only those records 
matching all the criteria entered, as 
in all left-handed baseball players in 
California. This is an and search, 
looking for records that match all 
three criteria, left-handed, baseball and 
California. You can search using or 
criteria by producing additional FIND 
rows using the Find command. To 
find all those who play baseball, and 
who are either left-handed or in Cal- 
ifornia, use two FIND rows: one that 
specifies baseball and left-handed, the 
other that says baseball and Califor- 
nia. Producing the correct combina- 
tion of FIND records can be quite a 
challenge. 

Searches in text and numeric col- 
umns can be limited by using the 
greater than, less than and equal to 
signs. The comparisons with text are 
in relation to the ASCII sequence, so 
once again, M is less than a. Simi- 
larly, wildcard searches using the 
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PRECISION FULL 
Justification or Right Justification. 


NEW! 


For Model 100 
Model 102 
Toshiba 1100+ 
NEC 8201 
Epson HX20/HX40 
IBM Convertible 
Sharp 2500 
Zenith 171 
Zenith 181 
Grid 


KEYBOARD 


SafeSkin m PROTECTOR 


Finally, A keyboard cover that remains in place during use! 


* PROTECTS CONTINUOUSLY - 24 HOURS A DAY - Against computer downtime due to liquid spills, dust ashes, staples, paper 
clips and other environmental hazards. 

* REMAINS IN PLACE during the operations of your keyboard. SafeSkin is precision molded to fit each key - like a "second skin.” 

* COVERS ENTIRE KEYBOARD CASE - Most SafeSkins are designed to cover the entire keyboard case - not just the key area. 

* EXCELLENT FEEL - The unique design eliminates any interference between adjacent keys, allowing smooth natural operation of 
your keyboard. 

* SafeSkin IS VIRTUALLY TRANSPARENT - Keytops and side markings are clearly visible. In fact, SafeSkin is so clear, sometimes 
you may not know it's there! 

* DURABLE - LONG LASTING - SafeSkin is not a "throw-away" item. Many of our protectors have lasted over 3 years under 
continuous daily use, without failure. 

SafeSkin is available for the portables listed above and most popular desktops PC's including IBM, APPLE, AT&T, COMPAQ, DEC 

EPSON KEYTRONICS, NEC, TANDY, TOSHIBA, WANG, WYSE, ZENITH. Specify computer make and model. Send $29.95, 

Check or M.O., VISA & MC include exp. date. Dealer inquiries invited. Free brochure available. 


Merritt Computer Products, Inc. 
4561 S. Westmoreland / Dallas, Texas 75237 / 214/339-0753 
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USE THE FULL POWER OF YOUR EPSON FX PRINTER 
with 


BPRINT.BA. 


FAST-POWERFUL 
WORD PROCESSOR-FORMATTER-TYPESETTER 
for Model 100/200 Computers 
and Epson FX Printers 





Use and mix any of the 88 Epson FX print modes with 
JUSTIFICATION, Left Justification, Center 





COMPARE THESE FEATURES 
* AUTOMATIC PAGE NUMBERING e SUPERSCRIPTS AND SUBSCRIPTS 
e HEADERS AND FOOTERS * DOUBLE STRIKING 
* AUTOMATIC INDENTATION * ADVANCE AND REVERSE PAPER FEED 
* AUTOMATIC CENTERING * APPENDED PRINTING OF FILES 
* FORMATTING ON ANY SIZE PAGE * MULTIPLE COPIES 
© LINE SPACING CONTROL TO 1/216" * REPETITION OF CHARACTERS 
eUNDERLINING * REPETITION OF CHARACTER STRINGS 
eTTALICS * ACCESS DOWNLOAD CHARACTER SET 


Over 150 printer and formatting commands can be given from 
control codes embedded in your TEXT file while you write. 


$45.00 + $5.00 postage and handling 


VISA AND MASTERCARD ACCEPTED — NEW MEXICO RESIDENTS ADD LOCAL SALES TAX 


SUN BELT SOFTWARE 


2215 N. Main #33, Las Cruces, NM 88001 — (808) 524-3798 
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question mark (find a single matching 
character) and the asterisk (find all 
matching characters) are useful. 

As with SORT, be patient with the 
FIND control record. Searches take 
time in long databases. 


COMMANDS 

The commands, as displayed at the 
bottom of the File screen, provide 
several manipulative functions on all 
selected columns or rows. After press- 
ing Esc, type either the first letter of 
the command name or use the Tab 
key to move the cursor to the ap- 
propriate name. Pressing Enter exe- 
cutes the command. 

Many commands are straightfor- 
ward. Copy inserts items into the 
system manager's scrap file without 
erasing the information on the 
screen. It is essentially the cut part of 
a cut-and-paste command. 

Delete does what it says. Be careful: 
delete does not ask questions first. 

Insert is the paste part of the cut- 
and-paste type command. It inserts 
items from the scrap into the selected 
regions and places extra data before 
the selected regions. Insert puts data 
only into those selected areas; if you 
had previously cut an entire row, but 
only wish to paste one column, sim- 
ply select that one column before ex- 
ecuting the Insert command. If you 
insert data into a record with infor- 
mation already contained in it, the 
old data is lost. 

Move, simply enough, moves rows 
and columns. To insert a new column 
(such as zip code) information into 
an existing database, simply create 
the ID and FORM records for this 
column as the last column to the 
right in the database, and Move this 
new column to the appropriate spot. 

Edit is the default, and most often 
used, command. While in edit mode, 
all the data in a given record, up to 
the maximum of 230 characters, is 
displayed at the bottom of the screen. 
Information in the ID, SORT, FORM 
and FIND rows are entered while in 
edit mode. Using the arrow keys 
moves the cursor from box to box; 
pressing Enter causes File to resort the 
database and leave the edit mode. In 
edit mode, the grey function keys F7 
through FIO are used as cursor-con- 
trol keys within records. 

One of Edit's quirks is a tendency 
to add extra columns and rows at 
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the database's far right and bottom. 
Simply ignore them until you're fin- 
ished editing, and then delete them 
as a group. 

Find inserts an additional FIND 
record for various or criteria in 
searches. New FIND rows appear 
above those already existing, so look 
carefully to be sure you don't enter 
too many—a blank FIND row causes 
File to display all data. 

The Options command in file af- 
fects the usage of FIND rows. Its effect 
is the same as a blank FIND row; 
when Options indicates that the 
FIND is turned off, all the data in 
the database appears on the screen. 

Jump moves the cursor around the 
database. Since rows are referred to 
by number, though, Jump's use is lim- 
ited by your knowledge of what each 
row contains. 

Lookup is useful for building new 
databases containing information 
stored in old ones. One drawback is 
that while the Lookup is occurring, 
both databases must be resident in 
memory — a difficult feat on a 32K 
system. 

The Print command lets you make 
a printed copy of selected data. Da- 
tabase information can be printed to 
the screen (CON:), the printer 
(PRN:), disk (A:filename) or resident 
memory (filename). 

Print also has two forms of printing, 
text and interchange. Text causes the 
database to print in the form of a 
spreadsheet, that is, with columns 
split between pages. Interchange 
places quotation marks around rec- 
ords, commas between records, and 
new line markers (down arrows) be- 
tween rows. If you print to disk or 
memory, you can edit this file with 
Word to your heart's content, using 
Replace to delete or change all the 
commas and quotation marks. 








TIPS AND TRICKS 

One of the tricks of File is to print 
only desired rows or columns. To 
print desired rows, first use FIND to 
search them out, then select them all 
using Shift-F10. Printing non-contig- 
uous columns is slightly more diffi- 
cult. First, make sure the database is 
saved on disk. Then, using the Move 
command, rearrange the columns so 
the ones you want are adjacent. Fi- 
nally, select those columns and print. 

File has no mailmerge capability. If 
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M100, M102, M200 RAM 


M100 

Increase the 

capacity of your 

Model 100 up to 128K. 

This is the same upgrade that has been sold for over two 
years to thousands of satisfied customers. The 96K version 
of additional RAM is now also available in an affordable 64K 
version. It simply snaps into the bottom of the computer, no 
disassembly required. And included is proven ROM software 
that makes this non-volatile RAM truly an extension of the 
computer memory. 


M102 This tiny RAM pack connects externally to your 
Model 102 and boosts the memory to 160K or288K! Instal- 
lation is as simple as plugging the cartridge into the external 
system buss. No modification to the computer is required 
and the software is included. Unplug the cartridge and retain 
the memory because this RAM is non-volatile battery 
backed. 


M200 At last an answer for the memory shortage of the 
Model 200. This RAM cartridge is similar in function to the 
M102 cartridge and is just as easy to use. It is also battery 
backed and boosts the RAM by 96K or 192K. 


Your satisfaction is our goal. All products come with 
a 30 day satisfaction refund, and a one year limited 
warranty. Instructions are included. 


Please Call or Write 
For Descriptive Literature 


714-540-1174 


e-| "e 


We also have other memory 


1580 Corporate Drive, Suite 123 
Costa Mesa, California 92626 
(714) 540-1174 


products for Tandy portables. 


Tandy is a Registered Trademark of Tandy Corp. 
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The. sky's the iin 
„With Port; le 100, 


On the road. . .at home 
.in the office. . .in the 
air. . .the variety of tasks 
you can perform with 
your Tandy portable is 
expanding constantly. 


In upcoming issues you 
will discover. . . 


* how new peripherals 
can make you more 
productive. 

* more efficient ways 

to communicate with 

your desktop. 

where to buy low-cost 

public-domain 


To keep fully informed 
and up-to-date about cur- 
rent trends, new products, 
and new uses for your 


laptop, you need Portable software. 

100 magazine. * how your business 
can be more profitable 
with your portable at 

From sophisticated input/ your fingertips 

output (I/O) calls and * where to find the best 


their applications, to sim- 
ple disk drives, Portable 
100 magazine covers it all. 


bulletin boards and 
information services. 


and much more! 


Portable 100 gives you 
features, news, columns, 
and reviews that are 
thorough and timely. 
And they are written in a 
fast-paced, easy-to-read 
style, by leading experts 
in the computer field. 


Don't miss even a single 
valuable monthly issue. 
Fill out the coupon below, 
or to charge it to your 
credit card, call toll-free 


1-800-258-5473 
In N.H. call 1-924-9471. 


Send no money now! We 
will gladly bill you. 





I want to explore ways to be more productive with my 
Tandy portable. . .and save 47% off the newsstand 
price. Send me a year's subscription (12 issues) of Portable 100 for $24.97. 





] Payment enclosed T Bill me 
Make checks payable to Portable 100 MONEY BACK 
GUARANTEE: 
Name = —— If you are not completely 
satisfied with Portable 100, 
Address ce you may cancel your sub- 
City 7 i See — Zip E scription and receive a full 


refund. Please allow 6-8 
Canada $45.97 (Canadian funds), Mexico, $29.97. Foreign weeks for delivery of your 
Surface $44.97. One year only. U.S. Funds drawn on U.S. banks. first issue. 

Foreign Airmail, please inquire. Please allow 6-8 weeks for 

delivery. 37NB4 

Manail tn: Dartahla 1660 CU Canammnniratinne/ Datorhnrnanoh PO Raw QSO Rarminodale NV 11727 
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you need it, you can mark the desired 
address in an address database, copy 
it into the scrap area and then insert 
it in the proper place in the letter. 
Repeat the process for each letter. It's 
tedious, but it works. 

Databases inevitably get longer, but 
the Tandy 600 limits file length to 
64K. When a database approaches 
the 64K limit, first SORT it by what 
you think is the most important item. 
Save the sorted database to disk. 
Now, delete the bottom half of the 
sorted database and save it under one 
name, such as BASE]; reload the full 
database, and save the bottom half 
under another name, such as BASE2. 

Whenever you must split the da- 
tabases, maintain the numbering or- 
der. Then, to load a bank of two or 
three databases—as many as three 
64K databases can be resident in 
memory in a 224K Tandy 600—enter 
the Copy command in the system 
manager. For the filename, enter 
A:BASE?.*. The ? after the file name 
is a wildcard taking the place of the 
number; the * insures that both the 


1/0 FOR REAL 
WORLD CONTROL 


oon 95 


MODEL | 
CIP/35A. | 
SHOWN $ 
WITHOUT 
COVER 


NOW ANY PERSONAL 
COMPUTER CAN HAVE THE 
MOST COST EFFECTIVE 
AND VERSATILE 1/0 BOARD 
ON THE MARKET TODAY! 


* Serial Link Interface 
RS-232 or TTL 

* 8 Relay Outputs, High 
Current AC/DC Form 
A&C 

* 8 Opto-Isolated Inputs 
Plus 8 Bit Counter 

* 8 Bit A/D with Span 
Adjust 0 to 5V, 
Provisions for up to 
8 Input Channels 


*|BM *HP eRADIO SHACK «COMMODORE* 
————— 


* ALL REGISTERED TRADEMARKS 


EXER SIAS Engineering, Inc. 


831 S. POWERS RD. / SALINA, KS 67401 / (913) 823-9209 
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* EASILY Programmed & Controlled 
Using BASIC Statements 

* Perfect for Lab Work, Machine 
Control, Security Systems, 
& Data Acquisition 

* Unprecedented Usability as 
Attested by University, 
Government & Industrial Users 

* Complete Documentation 
with Software Examples & Total 
Engineering Support 


.DAT files will be 


.FIL and the 
loaded. 

If you're interested, you can ex- 
amine File's data files directly. Enter 
the Word application and specify ei- 
ther the .DAT or the .FIL filename. 


jp is 

useful for 
building new 

databases 

containing 
information 
stored in old 

ones. 


They will both appear the same. The 
"special" characters littering the 
screen are File's form marks. Note 
that only the characters in each rec- 
ord appear without the trailing 








CALL OR WRITE FOR 
MORE INFORMATION 


Tray also fits: 

e Model 100 

e NEC 8201A 

e Chipmunk 
Drive 

Case without tray 

holds: 

èe NEC Multispeed 

e Toshiba 1100+ 









PHONE (612) 881-7221 





TRAVEL CASE PLUS -- 


MAKES YOUR LAPTOP PARTS A PORTABLE SYSTEM 














SIMONS 





10908 GLEN WILDING LANE 
BLOOMINGTON, MN 55431 





spaces, thereby saving memory. 

To create databases from a Word 
document, divide the data into sec- 
tions using tabs to indicate column 
divisions, and line ends (Shift-Enter) 
to indicate row ends. Once you have 
the information formatted, move it 
into the scrap area using Word's copy 
command. Set up the skeleton of the 
database by making a FORM record. 
Next, select the first row of the new 
database, and insert all the data from 
the scrap area. 

When you make a mistake, File, 
and generally all Tandy 600 applica- 
tions, will beep and move the cursor 
to where it thinks the error is located. 
If you can't locate the error at the 
cursor, look in the area immediately 
before it. Also, the Esc key can act 
as an “oops” key in edit. If you make 
a mistake when editing a single rec- 
ord, press Esc to exit the Edit mode. 
The record you were working on will 
return to its original data. 

Experiment with File. The Tandy 
600's portability and File's power 
make a fantastic combination. O 





e Unzip case, adjust typing easel, 
turn on switch and begin work 

* The Tandy 102 or 200 can remain 
connected to your disk drive 

* Navy blue padded nylon case 
and plastic tray protects 
equipment 

e. ay e front pocket will hold a 

TTXpress or Diconix 150 Printer 
Dimensions: 12.5" x 14" x 2.5" 

















+> v 
SA 


AAAA 


E 
A RARI KR, OR n QNO 


PRODUCTS ‘Travel case+ $85.00 e Case w/o tray $70.00 


Return within 15 days if not satisfied. 
Check, Money Order, Visa, M/C 
(Minnesota residents add 6% sales tax). 

We pay postage in Continental U.S.A. 
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SPREADSHEET 


Quote Format 
for the Model 100 


A Lucid concept that calculates everything automatically. 


f all the spreadsheet pro- 

grams I have on my Model 

100, the quote format run- 

ning ünder Lucid is my fa- 
vorite. It utilizes a Lucid concept 
called tables, which is similar to 
lookup and choose but much more 
versatile. 

We build custom-built products at 
my company. There is nothing on 
the shelf. Assume for a second that 
we build an electronic switching de- 
vice that automatically controls other 
devices. We make two sizes: the small 
one controls a single device, the large 
one controls ten devices. The fre- 
quency used to control devices varies, 
and the part that generates the fre- 
quency is what is custom-designed for 
each buyer. Because of our unique 





design, only a few parts in the unit 
need be changed, but labor and ma- 
terials costs vary with these changes. 

The quote format now enters the 
discussion. You get the entire pro- 
duction cost by entering the type or 


model number, the variable, and 
quantities to quote. This includes 
overhead, selling price, margin (by 
percent, unit and for the total quan- 
tity), total sales for each quantity and 
the entire overhead absorption. Every- 
thing is calculated automatically. 

In this article, we'll develop the 
spreadsheet first with labels only, and 
then the tables. As each table is com- 
pleted, we will return to the body of 
the spreadsheet and develop the for- 
mulas needed to use that particular 
table. 
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By G. N. Gilbert 


THE BODY 

First, all columns are nine charac- 
ters wide. The majority will have two 
decimal places. The column designa- 
tion is across the top and the row 
number down the left side. 

Place the cursor at cell Al. As 


usual, we will type in the name of 
the file under which this will be 


You get the 
entire 
production cost 
by entering the 
type or model 
number, the 
variable, and 
quantities to 
quote. 


saved, and the initials of both the 
designer and the prime user. In lower 
case, type "mstquo" for Master 
Quote, and the initials “gg/rr.” Re- 
member to save the original form as 
a master. When you load it back to 
the Model 100, change the name, 
input the data and save it under the 
new name. 

In cell A3, we'll place the current 
date by pressing Ctrl-D while in Lu- 
cid's Edit mode. To track our quo- 
tations, we sequentially number each 
one we print. Move the cursor to A4 


and type “QUOTE.NO.” This num- 
ber is entered manually and tracked 
in a logbook. 

Our title must be centered. The 
width of our spreadsheet is eight col- 
umns, each nine characters, or a total 
of 72 characters wide. Half of that is 
36. The title of our form is “QUO- 
TATION FORM—WIDGETS”, 24 
characters long. Half of that is 12, 
and 12 subtracted from 36 is 24. This 
means the title begins in column C4, 
the sixth character over from the be- 
ginning. Type in the title at this 
point. 

In A6, press the space bar four 
times and type “TYPE:”. This will be 
for our model number. The remain- 
ing labels are described in Fig. 1. The 
lines used to separate the different 
areas in A12, A32, A50 and A53 
should be replicated across to column 
H. Also, the dots (.) in front of some 
of the labels designate spaces and 
should not be typed. 


THE TABLES 

To describe a table, refer to the 
Lucid manual. It reads “TBL lets you 
have two input cells. It will look up 
those inputs on a chart. It finds one 
input on the X-axis or top row part 
of the chart, and the other input on 
the Y-axis or left column part of the 
chart. Where the two points cross on 
the table is the result that is re- 
turned." You can use either text or 
values for input and Lucid will return 
either text or values. 

The first example is a rather simple 
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TBL requires two numbers or items 
to look up. In this case, we only 


so we fooled it by look- 


ing at a number in B6 and a dummy 
number in D87. Cute, but why not 


needed one, 


just type in the size, and forget the 
table bit? Later, we will use the model 


or type number to help us calculate 


our labor and material costs. 


Let's continue with the pricing of 
each of the 11 parts in our four prod- 


ucts. Move the cursor to E61 and 
type in the data and formula from 


Fig. 2. 


, Part 6 and 


The formulas for Part 1 
Part 10 refer to the variable in B9. 


but rather 


an area set aside for calculations. 


This is not a true table, 


Now, place the cursor in A86 and 
type in the data in Fig. 3. This table 
establishes the 1,000-unit price for 
each of four products. Based on the 


the appro- 
be returned. 


This formula appears in the next ta- 


number typed in at B6, 


will 


priate cost 


ble. Move the cursor to C74 and type 


in the Fig. 4 information. 


The formula in E76 looks for the 
product type in B6 in the table lo- 


cated between B87 and C92. When 
it finds that particular type, it returns 


the costs to E76. Experience tells us 
that we can expect only six price 


breaks 


from vendors between the 


000. We also 


quantities of 1 and 100 


know what these discounts will av- 


Re- 


erage out to be and are used in the 
Now, go to Bl4 and type in the 


formulas in E77 through E81. 
tion for some time in the future. All 


we are doing is providing our cus- 
tomer with a very good estimate 


member, this is merely for a quota- 
based on current conditions. 


- “ax =. 
eS 


+ TBL(B11,$C74,$D74:$E81) 


Replicate this across to column H. 
The “$” tells Lucid that the cell follow- 


Sep». in 
», 


Move the cursor to D87 and 


b 
o 
$ 
o 
G 
ac 
o 
a 
E 
~ 
"Jd 
& 
is] 
~ 
oo 
am 
o 
~ 
o 
O 
o 
o 
a 
> 
ww 


“0”. In column E88, type a 


table. 


ing should not change when we repli- 


cate it across the rows. We want B11 
to change to C11 in column C, but we 


In F88, “MINI”; F89, “SMALL”; 


F90; “MEDIUM”; F91, “LARGE”. 


don’t want the cells that reference the 
table to change. Type a number in B6, 


Return to B6 and enter the number 
*3". Go to C6 and type in the for- 


mula “+ TBL(B6,D87,E87:F91)" and 
press Enter. The word "MEDIUM" 


should appear. In this formula, we 


input quantities along row 11 and press 


Calc (F2). 


Change the number in B6, press Calc 
again, and notice that the materials 


costs change. You can use any quan- 


are saying "look at what is in B6 and 
D87, go over to the table located 


tities you wish; Lucid will return only 


six different material costs for the quan- 


between E87 and F91, and return 
whatever is in the cell where they 


,000 based upon our ta- 


tities O to 100 


, you will get the 


ble. If you type in 250 


» 


cross. 
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1,000-piece price. If you use 1,001, Lu- 
cid will return the 5,000-piece price. 
The table should be structured to han- 
dle this. 

Move the cursor to B15 and type the 
formula “+B14*.05". We plan for a 
five-percent scrap factor when costing 
products. In B17, total the two material 
costs with "--Bl4-- B15”. Replicate 
both formulas to column H. 

Figure 5 calculates the labor hours by 
multiplying the variable by a constant 
assembly time. It then adds the stand- 
ard hours associated with that partic- 
ular product. Figure 6 is a table to sup- 
press zeros. Because the labor hours are 
associated with a product and not to 
volume, Lucid would print the labor 
hours even if a zero appeared in the 
quantity field. The other formulas 
would then try to use the labor hours 
in calculations that would be meaning- 
less, and they would only clutter the 
spreadsheet. Go ahead and type in the 
data from Figs. 5 and 6. 

In B83, for example, press the quo- 
tation key (9, the space bar, then Enter. 
The TBL formula will return a blank if 
the number is a zero. If that value is 
greater than 0, it will return whatever 
the value is. In cell A84, the “+ 1050" 
just means the number 10 to the 50th 
power. If you know what your maxi- 
mum number will be, you can use it, 
but “+1050” is simple enough to use. 
The formulas in B84 calculate the labor 
costs by multiplying the labor hours 
from Fig. 5 times our average rate of 
$6.50. 

Next, move the cursor to B19 and 
type in the formula “+ TBL(B6,A73, 
A74:B78)”. This will return the labor 
hours. In B21 input “+TBL(B11, 
$A81,$A82:$H84)”. This formula looks 
at the quantity in row 11, then goes to 
the zero suppression table and returns 
either a value if the quantity is greater 
than zero, or a blank if it is zero. Rep- 
licate this formula across to column H. 
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The next order of business is to cal- 
culate the overhead, both variable and 
fixed. Again, these calculations are not 
truly a table, but an area off the printed 
part of our page. Refer to Fig. 7 for the 
formulas for column B. Once you have 
typed in column B, replicate each 
across to column H. 

We figure 13 percent of our labor dol- 
lars covers the vacation, overtime and 
holidays. Also, another 13 percent is 
for labor that has been diverted to 
other than direct labor jobs. Fringes 
cover insurance and pension contribu- 
tions, and we use 26 percent of the va- 
cation and overtime plus the diverted 
labor plus the labor costs in B21. 

Our in-bound freight averages six 
percent of material costs, and our op- 
erating supplies about 11 percent. The 
fixed portion of the overhead is calcu- 
lated at 56 percent of labor costs. Re- 
turn the cursor to B26 and type 
* -- B59" to bring up the sum of the 
variable overhead, and in B27 type 
*--B60" for the fixed portion. We 
could calculate the fixed overhead in 
B27, but I want to keep the calculation 
areas together. We'll total our overhead 
with the formula “+B26+B27” in 
B29. In B31, let's get our total cost— 
* + B23 + B29”. Naturally, each of the 
above formulas should be replicated to 
column H. 

Before we get to the rest of the form, 
we will need to develop a table to cal- 
culate our margins. Refer to Fig. 8. We 
give a discount for volume—the higher 
the volume, the lower the price. Once 
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SPREADSHEET 





A 


93 VAR MAR *B11 
* (SPACE) 


94 0.00 


*C11 
* (SPACE) 


95 .. *10^50 *(B34-(D234226]) /B34 (C34- (C234 C265) )/C34 


95 TOT MAR +Bit 
* (SPACE) 
+(B34-B31)/B34 


97 8.02 
98 .. +1050 


you have entered the Margin table, go 
to B34 and enter the following formula: 
+ B31/(1-TBL(B11,$A61,$B61:$C71) 

We are dividing the total cost by 
the reciprocal of our margin percent. 
In B36, type “ + B34*1.05". We have 
sales representatives in certain parts 
of the country, and if they make a 
sale, we pay them a commission of 
five percent of the sales price. This 
is reflected in the sales price we give 
to our reps. These formulas should 
be replicated across to column H. 

Figure 9 contains zero suppression 
tables for both the variable margin 
and the total margin. With the ex- 
ception of the formulas, these are 
identical to the labor example above. 
We subtract our direct costs (material, 
labor and variable margin) from our 
sales price to give us a percentage. 
The total margin is the sales price 
minus the total cost, divided by the 
sales price for a percent. Be sure to 
copy these formulas to column H. 

Place the cursor in B38, and type 
the following formula: 

+ TBL(B11,$A81,$A93,$A93:$H95) 

Go to B40 and input the following: 
+ TBL(B11,$A81,$A96:$H98) 

Note we used A81 in both for- 
mulas. We can do that since the num- 
ber is a dummy, and in this case, a 
zero. 

The remaining formulas need no 
explanation: 


B42 + B34-B31 
B44 + B11*B42 
B46 + B11*B34 
B48 + BI1*B36 
B51 + B11*B29 


In B42, we are finding the differ- 
ence between our selling price and 
our cost. In the remaining formulas, 
we are multiplying the quantity by 
each margin, sales (with and without 
commission) and overhead. Make 
sure you replicate these formulas to 
column H. 
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+Cil 
“(SPACE ) 
* (CA 031/034 


FINISHING UP 

Now all you need to do is to type 
in the data required in the first 11 
lines and press Calc. A quotation will 
take less than five minutes. Our for- 
mat provides all the necessary infor- 
mation to make a decision. If you feel 
you must cut your price to get your 
foot in the door, you have the in- 
formation to make that decision. I 





Lecia will 
print all eight 
(columns) three 
at a time. 





think this is a useful tool, and it uses 
very little memory. 

I suggest you print the entire 
spreadsheet to get an idea of just how 
we put it together. Also, note how 
the tables are jammed in the lower 
part of the spreadsheet. We made ef- 
fective use of the available space. (By 
the way, the printed portion is cells 
A1 to H53.) 

Any time you develop a spread- 
sheet, I suggest you print a copy of 
the completed format and a copy of 
the spreadsheet’s formulas. To do the 
latter, widen the columns to fit the 
largest formula plus one, then press 
the Print key. Press List, which will 
print the formulas and Lucid will ad- 
just to the new size. In our spread- 
sheet, we used eight columns; our 
largest formula is 20 spaces plus one, 
or 21. 

On an 80-column printer, with 
margins, you can only print three 
columns. Lucid will print all eight, 
three at a time. Retain all copies in 
an appropriately labeled folder. This 
will be your backup should something 
go awry later.O 
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DISK POWER™ 
100/102/200KC-85 


Now available for Tandy 
Portable Disk Drive Il 
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= Direct access to BASIC & TEXT when on-line in TELCOM 


and displays all 40 disk files in each bank at once 
= Allows programs to access disk drive from BASIC 
= Save or Load .DO files directly from within TEXT 





- DISK POWER supports the 2 bank configuration of TDD-2 
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Kk F 
= List or Print DISK files without first loading to RAM 


= All file access is menu driven using cursors 

Load, Save or Kill up to 20 files at once 

- View the first 80 characters of your .DO or .BA files 
=- DISK POWER fully supports .CA, .CT, .CW files 








ORDER NOW- ONLY $59.95 





ask forextension 313-1 
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Reading Fine Print 


ntil now, the best you could 
expect of a dot matrix printer 


U 


were characters almost—but not 


. s 
* 
Qs" 
= 
E 


quite—as good as the characters of a 
low-priced, manual typewriter. And 
that was after four, slow passes! Purge 
yourself of these misconceptions. In 
the double strike mode, Epson's LQ- 

Welcome features are a 7K 


800 dot-matrix printer performs sub- 
lime feats. Its text is almost offensively 


formal. 


ex 


buffer, traction feed, character defi- 
nition capability and more than 100 


typestyles, of which about ten are 


useful. 


M 


iN 
8p:M 
Ts 
* R$( 


12%: 4- 
62159: 


ie A. s ee 
s dide rd 
- om ^ nae 


LES lone Co 
L di 


q 
.- 


à 
= 


Hi 


T 
g 


ip 


ge 


100’s_ built-in TEXT word 


Surprisingly, some routine 
The printer is compatible with the 


items, such as tractor feed and graph- 
Model 


ics capability, are optional. 
pagination and the use of text embed- 


ware is superfluous except to permit 
ded commands. 


processing program. Commercial soft- 





When I used the LQ-800 with the 
Model 100, I changed DIP switch 2- 


8 on the printer’s back panel to the 
“on” position. This advances the car- 
riage at the end of each line. If user- 


defined characters are not needed, 


DIP switch 1-4 should also be turned 


on to enable the 7K buffer. Keep all 
other switches at the factory setting. 


My program, PRINTR.BA, is used 


to configure the printer to the desired 


typestyle and page format. Although 
by no means exhaustive, it offers a 


wide range of options, 


which you can 


see in the program listing that follows 
the Input statements. By consulting 
the printer’s manual, additional op- 
tions may be appended. Pressing “-” 


B ri 


^ 


PUT. ^ 


nt 
aom t 


. 2 


v 
ate 


å 


followed by the Enter key at the 


E. 
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Your left margin default is set at 


one-inch when the paper’s left per- 
foration lies exactly three-sixteenths 


no selection is made. 


PORTABLE 100 NOVEMBER 1987 


22 





UTILITY CORNER 


li ja EAD. zu 


' THEN | PRINT I2, $1 J IGOTA. 32 RH ERIT | 
| 42,k1$ y BRINT #25K$: Kage" i24 1GQTO :32 | 

iB IF. K1$2'"' THEN K1$-K$: Ke: Goto: 52: ELSE. PRINT: 
: 32, K1$5 :K1$5K$:K29 |: HIE 

id. JE: TORCA) THEN: CLOSE:GOTO /28 ‘Buse 3: 


| 135; CLS:PRINT ana eset, Pierii i * fen, I Hi I 


' 54. MAXFILES=9:B EEP :MENU | 


155 LINE INPUT! f1,K$ 1020: dirus eMe i ny s] 


'ELSE IF LEN(K$)=6. T 


EA LF K26 OR ASC(K$)552 ‘THEN’ 45: 
E IF ASC(K$) >32 : ‘THEN | 39; PRE, IE d REN; 


TEA ELSE L=L#1: 


a 


L1 jest jan); 36570; EL 


EA IF’ B+L=9 THEN 


ITT: es 


liri ls itd Nn ‘18 Sai na | 


HII 


, 


IT 42 gi fiche: 6020, ii 


(M42 TR 1-0 date rity: ‘D4D-H ||| 
: 145 LSSLEPTS(K$ ,D-1)3 KS=RIGHTS (K$; LEN (és) 4041), 
ing; F X$ : "pt D ATD EAN IA, bps k= ih LPRINT 


155; : 145; 19 v" 56,5 P 


of an inch to the right of the printer 
plate's left edge. This corresponds to 
the left-most position of the optional 
tractor feed. To change the left mar- 
gin default, alter the values of vari- 
able B in lines five through nine; but 
note: B may not be equal to nine. 
Right margin justification (RMJ) is 
one of my program’s options. If you 
don’t select this option, the program 
terminates by returning to the main 
menu. If you enter the desired doc- 
ument file and use the Shift-Print 
command, the text will be printed. 
The printer retains the specified con- 
figuration until changed or until its 
power switch is turned off. If you 
select RMJ, my program requests the 
name of the document file to be 


printed and line length in one-tenth- | does not offer RMJ as an option. 
inch units. It then prints the text. —Rudy E. Kokich, MD | 
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When finished, you're offered the 
choice of a new filename. Pressing the 
F8 key terminates the program, resets 
the printer to the power-on default 
configuration and returns to the main 
menu. Select the unidirectional "L-R 
print" option for optimal results when 
in double strike mode and RMJ. 

RM] printing of a text with in- 
dented paragraphs can be done only 
through the PRINTR program be- 
cause the printer's software won't jus- 
tify the right margin on a paragraph's 
first line, if that line is indented. 
Lines 28-45 will correct the problem. 

RMJ is compatible with all letter 
(LQ) and draft (DQ) quality type 
styles, except condensed LQ pica and 
elite. If you select these, the program 





TEXT POWER™ 
100/102/200/KC-85 


Works with all daisy wheel, 
dot matrix & laser printers 


, boldface, italics , near 


letter quality, as well as other print sizes and font styles. 


ee Se a ee 


text merging, label making and allows file printing to begin 


TEXT POWER supports automatic page numbering, tabs, 
and end anywhere in the document. 


TEXT POWER features 


a 
to the 
Main 
EVERY BEFORE Menu 


entire 
document 


Preview Return 


printing ! 


Shows 
line by line 1% & last 
line of 


the file 


HER 166 
page ! 


Displays 
on the 
screen 


= 
de 
= 
42 
a 
= 
a 
A 
= 
ca 
a 
z 
- 
2 
ea 
T 
ù 


Send 
a file 
to any 


EXT Pt 
yrlaht i955 Hugo Ferreur 


T 
i 


Edit Verc 
Centers 
a one 
page 
Vertically or laser 


BH Cop 
Create 
or Edit 

any 


file. 


Rghtjustify, TEXT document dmp,dwp 


Pg Ingth, 
Pause, etc. 


€» | Pg width, 


Margins, 


ORDER NOW- ONLY $59.95 
1-800-255-1133 


ask for extension 313-1 


ULTRASOFT INNOVATIONS 
76 Main St., P.O. Box 247 
Champlain, New York 12919 
For Info call (514) 487-9293 
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one because it does just about everything. 


The Last Lister? 


Oh no, not another BASIC listing program! Yes, but this should be the last 


The state- 
0.” These might be 


fine in a program, to save RAM, but 


not in a listing. 


(LODY 


The program must be saved as a 


BASIC (.BA) file. When run, it will 


his program reads directly from 


the .BA files, so it's not neces- 

A. special feature of the program is 
the way it handles for-next loops and 
The program's best feature is that 
it adds spaces where they are needed 
in lines such as "IFOOORATHEN- 
Using the program is easy. To 
change the output device, load the 


conditional statements. 


sary to save programs to an otherwise 
100 DATA 0,39 


useless text file. (It also means it won't 
run on anything but a Model 100 


without some different PEEKs.) 
other and each ELSE listed under its 


corresponding THEN. Line 21 is an 


excellent example. 
the total lines per page. To output to 


a pageless device, such as the screen 
or a RAM file, use zero here. The 
second number is the characters per 


line. The third entry is the file name. 
clear the screen, display the names of 


all visible BASIC programs in mem- 
Type in the name of the program to 
be listed. This can be in upper case 
letters, lower case, or mixed, with or 
without an extension. If the program 
is in memory, it will be listed. If not, 
you wil get a “Try again" prompt. 
Invisible program names are accepted 


ory, and prompt "Program to list." 
but not displayed. 


device. For example, to output to the 


Set these parameters for the output 
screen use: 


lister and edit line 100. This is a 
DATA statement; its first line gives 


statements that refer to a particular 
THEN or ELSE listed under one an- 


all of the loops active at any point. 
IF-THEN-ELSE lines have all the 


ments between for and next are in- 
dented and can be nested to show 


NEXTELSETC 


jk 
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UTILITY CORNER ULTRASCREEN™ 
100/102/200/KC-85 
47! PEPCH Double your screen capacity 
PRINT #1 ;" Listing of "W" " DATE$ " "ZT; without losing readability! 
sIF sors 
THEN PRINT #1," °° PAGE "PC; 20029 
18. . ' "PRINT 44, 3 9-220 
SPRINT. #1, SCGES 
:LC=3 SORES g 
: RETURN conse 
2g yon O 5 S 5 E: 
:P-PEEK (A) ~ J sm0 
(SIE P5127: š oSls 
THEN «4j z o=Soez 
ELSE IF P E 5.20022» 
THEN 3 5 sols = 
ELSE GOSUB 13 z O095dg59 
21! | IF PEEK( A£2)- f es LZ cos 
THEN PRINT #1, ZSE ECS o 
PRINT #1," Length"A-Ap" bytes." he X 0027535 
:IF L ‘ i uoocmn 
THEN. PRINT' #1, .STRING$(L+LC-2 ,13) $2 Fo i = ou 
: END $55 Hea @ E 
ELSE END “3 S2o5s 5 
ELSE’ A=AN SPIO; 
22. ©  ANZPEEK( A)+PEEK ( A+1)*256=2™6 oct 
:M=6 eEcesY 
:TSM+F REERÉS 
eee (D 
i OS925 
:Z=MID$ (STR$( PEEK(A+2) +PEEK( A+3)*256) , 2) 2702x 
TW) hha E34 
:GOTO. 20 = iw — OC z 
50: © - Y=CHRS(P) a .:fDtssc 
JF yes." Bg XE acs > 
THEN. GOSUB 13 $2 35 Bi22o5 
:IF) PEEK( A+1)=142° AND 'PEEK( A+2)=255 we $5 Bw pose 
THEN A=A+2 wa L tc © = a 
:COTO 2¢ aries OSs = = | 
ELSE IF PEEK(A+1)2145 S216 BOSET 
THEN A441 eU BOL se Ss 
COTO i20 -scst SRC= 5 
34°. IF Y="," AND Ne1: AND F 5: Mio? 
THEN F-F-2 »u:c.Moíls 
:T3T1-2 waccocta2 Sz 
22... IF P34 moe ot 2023-235 
THEN’ G=P 24758 T o oz 
:GOSUB 11 honest e .c 29 
33. - IF INSTR" > :(", Y) coss Noo-7--. 
THEN S- ^14 E 3- 
ELSE! $30 -"No-ovosSs 
BAe | Xexel $So92 
amv zoo6028 
M — y= += 
i An 29 2alo 5 
estat) ORDER NOW- ONLY $34.95 
41: : © “EF LEN(Y)>4° AND iS- 1-800-255-1133 
s "n n r . 
j IO itin THU ask for extension 313-1 
THEN X=X+Y ULTRASOFT INNOVATIONS 
j [ G39 76 Main St., P.O. Box 247 
: drea Champlain, New York 12919 


For Info call (514) 487-9293 
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Line 1 sets aside 600 bytes for string 


A line-by-line analysis shows the 
variables. It defines “A” through "T" 
The data “L,” “C” and "V" are the 
page length, width and output file 


Program flow begins at line 1, then 
following: 


jumps to line 60 for the input routine. 
This is to save execution time by 


placing the lines most often called 
near the start of the program. The 
subroutines are located in line 10 
through 18 for the same reason. Line 
20 examines each byte of the program 
being listed and dispatches tokens to 
21 handles the end of the program; 
line 22 is for new line numbers. 

as integers, and “U” through "Z" as 
string variables. *P" and "A" are the 
be on top of the variable stack. 
Again, this is for execution speed. 
in ROM the location of the keywords 


"DIM T(127)" reserves space to store 
used in BASIC. 


line 40 and characters to line 30. Line 
most frequently used variables and 
are initialized here so that they will 


GO WITH THE FLOW 


m 


pn ard odi - 4 


an 


. wot ott 
ape r$ 


nae 
pum ddp 
-—e ^9 -——— 


name located in line 100, where they 
can be easily changed. They need not 
be input every time the program is 
run. If the output file is the line 
printer (LPT:) then its status is 


—— 0 70 


message is "Printer not ready!" When 

Line 10 is a subroutine that accepts 
a Token as “G” and returns the cor- 
responding keyword. They are stored 

Lines 11 and 12 are the subroutine 
for handling quotations and “REM” 
statements, which are not modified 


corrected, program execution contin- 


ues automatically. 
most significant digit bit (128) set, so 


character of each keyword has its 
when a character after the first one 
is greater than 127, the keyword is 
complete. 


checked. If it's not ready, then the 
in ROM in this manner: the first 





ue? 
— "n w-o-— 


-—— Amm m m 


--- 
-— -— ^ 


--- 


-— 
— ——M "tcm cm s 


op. 


LER 


G 


then it represents the closing quote 
mark. In either case, control is re- 
turned to the main program. 


0 then the end 


of the line has been reached. In the 
34, so if P 


Lines 13 through 18 are the print- 
ing subroutine, which is called at the 


by the program. If P 
case of quotations, G 
end of each statement. 


Line 13 deals with *OPEN" state- 


ments, which actually don't fit the 
usual structure very well at all. The 


points to the space after 


«y? 


variable 
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| tcl (SPACES) 9 


: ZTSTIME$.: 


3 FOR I=-1617 10-1490 STEP. 11 
- sIF(BEEK(I) AND NOT 8)=128 


: THEN : FOR: J=1 -TO 5: 


ZDF PEEK(I+2+J)= ASC(MID$(W,J,1)) - 


; THEN NEXT.J 


:A-PEEK(I«1)* PEEK(I*2)*256-2^ 16 


| LSAD-A 


:GOSUB 47... 


:GOTO 22 


|| PRINT "Try: again"; 


< GOTO“ 62 


* ! DATA 0,80 ,"CAS:LIST" 
DLDDITIREM: Page length, width ard output file. 


“FOR.” First, all spaces after this are 
removed, such as the space before the 
keyword "END" in "APPEND" or 
after “OUT” in "OUTPUT". Then 
spaces are added on each end of 
"AS," which is not a keyword, to 





represents a BASIC keyword, then 
*P" will have a value of 128 to 255, 
depending on which keyword it rep- 
resents. The program will branch to 
line 40. Otherwise, if “P” is not zero, 
then it is the ASC value of a char- 





acter, and the program branches to 
line 30. If “P” is zero, then it is an 
end-of-line flag, and the last state- 
ment is printed (GOSUB 13). 

Line 21 checks for the end of the 
program. If it is found, it prints the 
amount of memory the program oc- 
cupies at the end of the listing, gen- 
erates a form feed and ends. If it isn't 
the end, then "A" is set equal to 
“AN,” the next line's start address. 

Line 22 deals with a new line num- 
ber, stored in RAM in this manner: 
after the end-ofline flag (zero), the 
next two bytes point to the start of 
the next line, and the two bytes fol- 
lowing represent the current line 
number. Both of these numbers are 
coded in a way that is easy for the 
machine to understand, in base 256 
with the least significant digit first. 
So, the second byte times 256 plus 
the first byte is the number. “AN,” 
the next line address, is PEEK(A) + 
PEEK(A + 1)*256. 

Subracting two to the sixteenth 
power (64K) brings the value back 
into the integer range without chang- 


make it read right. 

Line 14 is used in "DEF" statements 
to add a space after “SNG,” “DBL” 

r "STR", which also are not key- 
words. 

Line 15 sets up the margin string 
“U” and inserts the line number “Z,” 
if any. It prints as much of the state- 
ment as will fit on one line and in- 
crements the line count "LC". If the 
whole statement won't fit on one line, 
then the tilde (^v) is used to indicate 
a line overflow. The next part of the 
statement is printed using the same 
margin. 

Line 15 resets the margin, clears 
"X" (the statement string), sets “S” 
so that the next line won't start with 


NEW BIG SURPRISES COME 
IN SMALL PACKAGES 








IMP-24 


12 OZ. OF TOP QUALITY 


IMPACT PRINTING FOR 





a space, and zeroes the “DEF,” TANDY NOTEBOOK 
“NEXT” and “OPEN” flags. Then, if 
the end of the page has not been COMPUTERS. 


reached, control is returned to the 
main program. If the end of the page 
has been reached, then a form feed 
is generated. 

Lines 17 and 18 print the page 
header. Note that if “L,” the page 
length, is zero, no page number is 
printed. 

Line 20 is the start of the main 
loop of the program and the dis- 
patcher. “A” is the address of the 
byte of the program being considered, 
and “P” is its contents. If the byte 





The IMP-24 offers: 

A choice of 24, 32, or 40 columns, ASCII and Radio Shack Graphics, 
serial or parallel interfaces, and optional rechargable batteries. 
Suggested list price *269° 


ae a eon 
=Arean vc «o 


THE PORTABLE PERIPHERALS PEOPLE 


2257 South 1100 East 
Salt Lake City, Utah 84106 
(801) 466-9797 
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ing it (as far as the machine is con- 
cerned) Then "M" is reset to 6 
because all “IF-THEN-ELSE” condi- 
tions end with a new line, and “T” 
is the total margin is set to *M" plus 
"E," the “FOR” margin. “S” is set to 
prevent leading spaces, “Z” becomes 
the new line number, and “A” is 
advanced to the next program bit. 

Line 30 is the start of the character 
handling routine. First, "Y" is set 
equal to the character represented by 
"P." The remainder of the line deals 
with the cases where "Y" is a colon. 
In every case, it indicates the end of 
a statement, so the present statement 
is printed. When an apostrophe is 
used for a remark, it is stored in 
RAM as a colon, the token for 
"REM" (142) and the token for an 
apostrophe (255), but listed as '. So 
“A” is advanced two. Next, “ELSE” 
has an implied colon before it in 
RAM, as it is the start of a new 
statement. So, *A" is advanced one. 

In line 31, N21 indicates a 
"NEXT" statement. Each comma in 
such a statement indicates the end of 
another for-next loop, so if the 
“FOR” margin “F” is non-zero, then 
it is reduced by two. 

Line 32 directs quotations to sub- 
routine 11 with a return on a closed 
quote or end-of-line flag. 

Line 33 specifies that a space will 
not be inserted after a space, a colon 
or an opening parenthesis. 

Line 34 appends the character to 
the statement string “X,” increments 
the address counter “A,” and returns 
to the dispatcher. 

Line 40 is the start of the token- 
handling routine and calls for the 
keyword represented by the token. 
Line 41 inserts a space before key- 

































words with a length greater than one 
unless it has already been specified 
otherwise. 

Line 42 directs remark statements 
to subroutine 12, where they will be 













(epson ud Sod 
changes the 
margin of the 
present 
statement, and 
changing “M” 
changes the 
margin of 
following 
statements. 
























listed without modification until the 
end-of-line flag is reached. 

Lines 43 and 44 direct the state- 
ment before “THEN” to be listed and 
manage the margin in conditional 
lines. Changing “T” changes the mar- 
gin of the present statement, and 
changing “M” changes the margin of 
following statements. 

Line 45 sets the “OPEN” flag “O,” 
which changes the meaning of “FOR” 
and activates line 13. 

Line 46 recognizes “FOR” and, if 
it occurs in an “OPEN” statement, 
changes the open flag to a pointer, 
or else increments the “FOR” margin 
“F” by two. 

Line 47 detects the end of “FOR- 

























Plug the cassette input of your Tandy 100/102/200 into the DATAMITE and it will provide high 
resolution, +.04% accurate A/D conversion over a 0-5 volt input range. Companion chart recorder 
software samples input voltage of DATAMITE at user-selected intervals, records value in RAM, and 
plots a calibrated scrolling graphic display of voltage data on your computer screen. See August 
1987 issue of Portable 100 for a complete description of the DATAMITE. (NEC, Olivetti versions also. ) 


$45.00 
$24.00 
$35.00 


DATAMITE 

Chart Recorder Software 
DATAMITE Kit 
VISA/Master Card 


THE DATAMITE 


LOW COST ANALOG TO DIGITAL 
CONVERSION FOR YOUR TANDY LAPTOP 

















Jones Service & Design 
1842 S. Nugent Road 
Lummi Island, WA 98262 
(206) 758-7258 
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NEXT" loops, decreases “F, the 
"FOR" margin, if it is greater than 
zero, and sets “N,” the “NEXT” flag, 
in the event a multiple next occurs 
in the statement. 

Line 48 sets the "DEF" pointer “D” 
for line 14. 

Line 49 specifies that no space will 
be inserted after the single character 
keywords or "MAX," "DEF" or 
“TABI”. 

Line 50 adds the keyword to the 
statement string, then looks at the 
next byte. Unless no space after has 
been specified by line 49 or the next 
byte is the end-of-line flag, space, co- 
lon, open parentheses, dollar sign or 
token, then a space is appended to 
the statement before returning to the 
dispatcher. 

Line 60 is the start-of-input routine 
and lists all the visible BASIC pro- 
grams in memory. 

Line 61 opens the output file and 
prints the input prompt, then pro- 
ceeds to find all the token pointers. 
Input is accepted but not displayed 
while this is taking place. This is an 
unconventional but effective time- 
saver. 

Line 62 starts with the actual input 
statement. Here, whatever has been 
typed is displayed and, after the input 
is complete, any extension is dropped. 

Line 63 converts any lower case 
letters to upper case. 

Line 64 pads the program name 
with spaces to a length of six char- 
acters and searches for a BASIC pro- 
gram in memory with the same name. 
“AND NOT P" allows invisible pro- 
gram names to be recognized. If a 
match is found, then “A” is set equal 
to the start address, as is “A0.” “GO- 
SUB 17" prints the page header; then 
line 22 is the entry point. 

If no match is found, then line 65 
prints "Try again" and line 62 accepts 
another file name. 

That’s all there is to it. As written, 
this program provides the necessary 
minimum of spaces. If more are de- 
sired, modify lines 33, 49 and 50 to 
taste. 

Simpler variations on this program 
can be used to create a text file with 
spaces added for easy editing or with 
unnecessary spaces removed for com- 
pact storage. These will be left to the 
creative programmer. 






—Larry Mclnteer 
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The Organizer 


p found the Model 100 to be the 
ideal tool to help with organizing 
my day-to-day activities. After seeing 
Ray Mendenhall's program (“Date- 
book for the Disorganized,” July 
1985), I decided to submit my version 
of a calendar program. My objective, 
like Mr. Mendenhall’s, is to use the 
Model 100 to keep track of scheduled 
events and to remind me when those 
events are about to take place. I have, 
however, taken a somewhat different 
approach. 

After asking you for the beginning 
and ending dates for the period in 
which you are interested, program 
AGENDA searches the NOTE.DO 
file to find entries that fall within the 
defined period. Selected entries are 
displayed one day at a time, and you 
signal the program to move on to the 
next day. 

Records in the NOTE.DO file are 
formatted so that the first five char- 
acters represent the month and day 
of the event (in the format mm.dd). 
If character six of the entry contains 
the “+” symbol, it means the event 


, "46427 * 34 F HHIIHHT 
Iff FHT f 


starts on the date specified and con- 
tinues for a given number of days. 
For example, an entry such as 
“02.10 +04 Trip to New York” means 
the trip starts on February 10 and 
lasts for four days. Using such coding 
enables the program, with only one 
record in the NOTE.DO file, to han- 
dle events spanning several consecu- 
tive days. 

My program starts by asking for 
the beginning and ending dates of 
your event. The dates are converted 
to Julian date format to set up a loop 
that determines how many times the 
NOTE.DO file will be searched (once 
for each day in the specified period). 
While going through each loop cycle, 
records of the NOTE.DO file are 
read, and the date in positions one 
through five is converted to Julian 
format. 

If this date matches the current 
loop index, the entry’s narrative por- 
tion is displayed. Records not matching 
the current loop index are ignored. 
Each loop cycle is terminated when ei- 


ther the last record of the NOTE.DO 


Ag: REM Agha! ‘by. ‘Hugh. FELETI HTTH. 

| : 20 NV$=CHR$(27)+"q" :RV$=CHR$(27)+"p" 

'' BØ. CD$=LEFT$ ( DATES ,2) +MID$(DATE$ ,4,2). 

E M$-"JankebMarAprMayJunJul AugSepdctNovDec" 

Hi DY$(Ø)=" Sün" :DY$(1)="Mon":DY$(2)=" The": | 
uvtetendihdii toig. Tiri Pee 


-/DY$(6)s"Sat" * FE 
H GOTO' 196. IPHIH 
"n 'REM Gregorian ` 


to PHEN: Conversion H. : f + 


'' BØ IF-M143 THEN M1-M1412:Y1-Y1-1 


E M1-M1«1 :JD-INT( 365. 25*11) mr. sto) 


'+D1+172¢982 :RETURN | 


add REM Julian. to. idhegetten: Conversion l 
HH orean NANA 36867) 
(11 SUS- INT( (14697*V+3)/4)4U -` 


CIT (APO (0+1)/ 1461 


s 


Us- INT(1461*Y/4)431«U. 4 


It COSMEZNTO B9*0/2447) or THEMA Ai H | 
TIT ‘$ SUSINT(M/11) :M3-12XU«2&M: IHE HEY: 
// 'sNOS-MIDS UIS (w*3-2),3):. 
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file is read, or when a record is read 
and its date is greater than the loop 
index. The last condition saves time by 
not continuing to read records from 
the NOTE.DO file when a date is 
greater than what is being searched. Of 
course, this requires that all records in 
the NOTE.DO file be in date sequence. 

If entries are found for the date 
being searched, they are displayed. At 
the end of the loop for each day, you 
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have a display of all events scheduled. 
Press Enter to continue to the next 
day in the specified period. The pro- 
gram automaticaly goes on to the 
next day, and you don't need to in- 
tervene for those days when no event 
is scheduled. 

Program AGENDA  accomplishes 
the fundamental tasks for helping you 
with a busy schedule. You can add 
some enhancements for additional ca- 


pabilities. For example, you could add 

a routine to deal with events that 

happen every given day—say, a bow- 

ling league that meets every Tuesday. 

By putting in a special code at the 

first character of each record, and a 

code to signify the day of the week 

(0 for Sunday, 1 for Monday, and so 

on), you could have one record in the 

NOTE.DO file for each such event and 

have AGENDA automatically pick 

them up. 

Another possibility is to add a 
printout routine so you can make a 
printed agenda for a specified period. 
This can be done by asking whether 
or not a printout is desired when the 
program begins, then adding the nec- 
essary LPRINT statements in the dis- 
play subroutine. 

The major routines in my program 
are: 

(1) Lines 20-50 are merely housekeep- 
ing functions. Line 60 transfers 
control to the beginning of the 
program. 

Lines 70-90 are the subroutine 
that converts Gregorian dates to 
a Julian date format. For speed, 
this subroutine and the next one 
are located at the beginning of 
the program. 

Lines 100-130 are the subroutine 
that converts Julian dates to a 
Gregorian date format. 

Lines 190-220 are the beginning 
of the program that prompt for 
the beginning and ending dates 
of the period involved. Each date 
is converted to Julian format so 
it can be used as the loop's be- 
ginning and ending values. 

(5) Lines 230-410 are the loop which 
reads through the NOTE.DO file, 
once for each day in the specified 
period. Line 300 may appear a bit 
strange, but I have other than 
calendar entries in NOTE.DO, 
and this statement serves to ig- 
nore them. You can delete it if 
you only have records in the for- 
mat described above. Lines 310- 
330 pull out the date information 
from the record, and line 340 
causes the date information to be 
converted to Julian format for 
comparison purposes. Line 370 
compares the Julian date of the 
record being read with the loop 
index. If the two are equal, then 
subroutine 430 is called to display 
the record. —Hugh Lochrane 
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Your own Program 


SK or 32K 

Your BASIC or machine 

code program on a custom ROM 
ready to snap into your Model 100, 
Tandy 102 or Tandy 200. 

You can t tell your program from a 
built-in. Starting at $50.00 each. 
Minimum order of 10. Quantity 
pricing as low as $15 


PORTABLE COMPUTER SURORT ORQUP 


11035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 


1-214-351-0564 


VISA / MASTER CARD / C.O.D. 
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Indexing with SuperROM 
Easy back-of-book indexes. 
(page 8) 

Excellent 


Portable File Cabinet 
Understanding Tandy 600 FILE. 
(page 12) 

Excellent 


Quote Format for the Model 100 
Making business decisions. 
(page 18) 

Excellent 


Utility Corner 
Reading, Lister and Organizer. 
(page 22) 

Excellent 


Every reader has unique needs. Some seek WWE ron. 
reviews of software and peripherals. Others look to a magazine to. 
provide tips to increase their programming proficiency. Accounts - 
of innovative applications attract a big audience, as do articles: 
about other users who find creative ways to use their systems. `` 

You can help tailor Portable 100 to your unique needs. by. 
rating the articles that appeared in this issue. Just circle the | | 
numbers indicated below on the Reader Service Card at left. Rate. 
all the articles, some of them or just one. Then detach. the card ' i 
and drop it into the mail — TH ttt 

The editors will analyze your feedback and respond. Bj e com: | 
missioning more articles of the most popular types — and fewer. 
of the losers. 


we pay the postage. 


The Plot Thickens 
LCD function plotting. 
(page 22) 


Excellent 


Real Cheap Video 
Build a video interface. 
(page 39) 

Excellent 


Checking It Twice 
Avoiding disk errors. 
Excellent 


OVERALL QUALITY 
OF THIS ISSUE 











Free 
Information 


For free information on products 
advertised in this issue of Portable 
100, locate the Reader Service number 
corresponding to the advertisement 
that interests you. Circle the number 
on the card at left and drop it into the 
mail. The literature you've requested 
will be forwarded to you without 
obligation. Please allow 3-5 weeks for 
delivery. 
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Now you can put your own 


plug-in ROM chip. 


A custom ROM service 
designed especially for 
corporate and government 
clients. 


Now, Traveling Software can trans: 
form your own BASIC or machine code 
programs into executable applications in a 
built-in ROM chip—by using a process 
called "Guardian" that took two years and 
thousands of man hours to develop. 


Fast, simple, economical and 
guaranteed, 


It's a very simple, speedy process to 
have your own applications “burned” into 
a plug-in ROM chip. All you do is send 
Traveling Software your programs on a 
disk with a check for $500 for your first 
ROM. Then, the Traveling Software 
engineers will convert your program(s) into 
a plug-in ROM chip. 

Quantity purchases can achieve a 
per ROM cost of only $49, with full credit 
for the initial $500 cost. Normal service 
turnaround is 7-10 working days. Optional 
rush service of 24-48 hours is possible. 


Combine Traveling Software 
Programs with your own. 


For orders of 50 or more custom 
ROM's, Traveling Software is offering the 





= 


i 78.008; Tac T is VoEA re rale'oris of Traveling Solare inc) = © 


2:1 7 Busan Sal lemark of Polar Engingering > 27 


2521 E 


Sennen 





be “reburned” into exist 
ing chips without replac 
ing costly CMOS ROM 


Proven technology 
thousands of Guardian 
ROM's have been 


installed since early chips 

1985 A few current Guard- 
Traveling Software has ian ROM customers: 
years of experience with Associated Press 


laptop computers and 
ROM technologies 
Economical solutions to 
many applications, as 
low as $49 per custom 


McDonald's Corporation 
Swiss News Agency 
Matrix Instruments, Inc 
Professional Growth 





programs Ona 


Ocean State Scale 
Pruett Industries 
Specialty Instruments 


Associates Tom Villars 
ROM : Biolabs Inc Project Manager 
Built-in future protection! Shell Pipeline Company Enterprise Systems, Inc 
Program changes can Del Mar Avionics 

Business Systems 

Design, Inc 





SERV IG 


Circle 72 on Reader Service Card ` 





option to combine popular products like 
TS-DOS, T-Word, IDEA! or T-base with 
your programs on a single chip. 

Build your own "ultimate ROM” 
using any Traveling Software product with 
your own custom applications. 

The possibilities are endless! For 
instance, you can even join a bar code 
reader data logging application with the 
disk access powers of TS-DOS and put it 
on a single plug-in chip! 


Tandy and NEC Computer Sales. 
Looking for a Tandy Model 100/102, 

200 or NEC PC-8201 laptop computer to go 
along with your custom ROM's? Traveling 
Software is now an authorized distributor of 
these computers. Let Traveling Software 
take care of all your laptop computing 
needs with just one purchase order! 


For your FREE ROM information kit call toll free 


1800 343-8080 


Or write: Traveling Software 
North Creek Corporate Center 
19310 Nortt 
Bothell, Washington 98011 
206-483-8088 
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PROGRAMMING WORKSHOP 


'The Plot Thickens 


Using the Model 100 for quick-and-dirty function plotting. 
By Alan L. Zeichick 
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Equation of y —sin(x); x lies between — 6.5 and 6.5. 


y father-in-law is a sta- 

tistics professor. He loves 

gadgets, especially com- 

puters and fancy scien- 
tific calculators. Last time I saw him, 
he was engrossed in his latest toy: a 
pocket calculator with a large, two- 
inch-square LCD display. But this 
was more than a mere calculator; it 
was also a miniature on-screen plot- 
ter. By simply entering an equation 
and x-coordinate limits, any algebraic 
function could be displayed on the 
bit-emapped LCD. “Can your Model 
100 do this?" he asked. 

It took some time, but the two of 
us designed and programmed 
GRAE.BA, a simple function graph- 
ing program for the Model 100 and 
Tandy 102. Later, I added the flexi- 
bility to enable this program to work 
on the Tandy 200. 


OF MICE AND MEN 

Modern computer graphics pro- 
grams come in many shapes and 
forms, from the high-powered MS- 
DOS drafting package AutoCAD to 
the Macintosh’s recreational Mac- 
Paint. But Graf didn't require that 
level of sophistication. Indeed, its 
only purpose was to quickly plot the 
graph of a mathematical equation, 
allowing the mathematician, statisti- 
cian or engineer to look at the shape 
of the curve. Frequently, this infor- 
mation is meaningful for checking the 
accuracy of a problem's solution. 

Despite the fact that Graf was in- 
tended to create simple graphs on the 
laptop's liquid-crystal display, the pro- 
gram's design took some time. As 
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with any non-trivial product, there 
were questions to be asked and an- 
swers to be found: Where will the 
equation come from? How will the 
x-y coordinate pairs be generated, and 
between what limits? Will the pro- 
gram automatically scale the finished 
plot? Will the program also display 
the graph’s axes? What happens to 
horizontal lines, or plots of 1/0, or 
the square root of -1? As we answered 
each question, the finished product 
slowly took shape. 

A truly sophisticated and user- 
friendly mathematics package should 
prompt the user to solve an equation 
and evaluate it internally. In other 
words, it's pretty tacky to require the 
user to actually modify the program 
by inserting the desired equation: 
10000 Y 2 SIN(X) 

That's exactly what we did, though. 


$ EERE : 
Equation of y= sqr(abs((sin(x) 4-.cos(9)))); x lies between — 2.5 and 2.5. 


Why? Some versions of the BASIC 
language allow you to enter the right 
side of an equation as a string vari- 
able, say EQ$, and evaluate it as 
such: 

100 EQ$ 2 "X +4” 

110 X217 

120 Y =EVAL(EQ$) 

yielding a value of y equal to 21. But 
not the faithful and trusty Model 100 
laptop BASIC. 

There's another way, I thought, to 
evaluate an equation entered from 
the keyboard in a program: save the 
equation to a RAM file, and merge 
it into the program file, using BA- 
SIC's MERGE function. The pro- 
gram fragment would look something 
like this: 

10 PRINT "What's the equation?" 

20 LINE INPUT EQ$ 

30 OPEN “EQ.DO” FOR OUTPUT 
AS I 

40 PRINT #1, “80 ”+EQ$ 


50 CLOSE #1 
60 MERGE "EQ.DO" 
10 X217 


90 PRINT “Y ="sY 

If the user entered “Y 2X4" at 
the prompt, I thought, the program 
would return the result 17. But no 
such luck; unlike esoteric functions 
such as PRINT and OPEN, the 
MERGE statement terminates pro- 
gram execution after the merge. 
Trying to use CONT to resume ex- 
ecution results in a ?CN can't continue 
error message; the merging operation 
seems to change the BASIC work- 
space sufficiently to forbid further 
program interpretation. 

After much experimentation, my 


tov 
Sa Y 
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Whew! One 


to the tacky, but functional, modifi- 
cation of the program for each desired 
graph. We decided to use the simple 
variable names x and y, and to place 
the equation at the easy-to-remember 
line 10000; by placing a RETURN at 

At least we didn’t have too much 
difficulty with the next problem: the 

Next logical step: generating the 
x-y coordinate pairs. First of all, how 

If were generating x values in a 
loop, what's the increment? If the 
initial x value, say, is 0, and the high- 
est x value is 239—one for each 
pixel—what should we add to x each 

When it's time to similarly scale the 
y coordinates, we'll need to know the 


line 10010, we can call the equation 


via a subroutine call. 


hurdle safely passed. 
case of the upper and lower function 


limits. A simple subroutine at lines 


1400 and 1480 did the trick, along 
with a little error-checking. Many 


programmers write error-checking 


routines after the program is com- 
pleted; I’ve found that if error check- 
ing is written into the product from 


the very start, it's less likely that po- 
tential errors will be forgotten—and 
besides, the user-designed error mes- 
using a common error-handling func- 
tion, which I've placed at lines 2010- 
waits for the user to press a key. By 
assigning text to the string variable 


ER$ and branching to that subrou- 
tine, error messages can be displayed 


with minimal code duplication. 
many? On all three laptops, the 


screen has a horizontal resolution of 
240 dots (or pixels) numbered 0 to 
erated by a FOR-NEXT loop, and 
240 y values, stored in an array ap- 


propriately named Y (line 1060). 
time through our loop? The answer 


is one, and in the general case, that's 
found by subtracting the lower limit 
from the upper, and dividing by 239. 


That's determined in line 1520; the 
variable name XI is an abbreviation 


for x increment. 
two variables, YL and YH, to keep 


track of those in our subroutine be- 
tween lines 1520 and 1690. Initially, 


lowest and highest y values. Let's use 
the x value is our lowest x, 


sages can help during the program 
2060; it prints "Error" in inverse 
video, displays my error message and 
239. So, we'll need 240 x values, gen- 


father-and-law and I became resigned 
building and debugging stages. I like 
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the first y value calculated in line 
1560. The loop at lines 1630-1690 
increments the x value by our XI 


factor, calculates a new value of y 


the new y in the Y array. This short 
seven-line loop takes the most exe- 


through a subroutine call, updates 
the YL and YH variables, and stores 


œ 


E T 


for instance. 


The equation 
plot that equation be- 


sqr(abs((sin(xA2) + cos(xA3)) A3)) 


cution time of any part of Graf; de- 


pending on the complexity of the 
equation at line 10000, this could 
take many minutes. 

took about 2.5 minutes, 

(By the way, 


3 


the 


er- 
Model 100 error code is tested against 


s interesting!) 


Line 1640, which prints a little pe- 
riod (*") on the display every few 
seconds, slows the loop slightly—but 

During our calculation process, 
ror-checking is in full force. System- 
generated errors caused by the line 
-1), numeric overflow and division by 
zero. I recommend that you not enter 
line 1540, the ON ERROR statement, 
until you've verified that the program 
is working correctly—since it assumes 
that all errors are mathematical in 
origin, it might be difficult to find 


function calls (such as square root of 
typographical errors. 


I feel that it's worth it. No user enjoys 
that feeling of helplessness while a 
minute: "Is it working? Is it dead? 
Hello?" If you want to optimize the 
you can eliminate all of the comment 


lines when typing, to save effort and 


even conserve RAM. 
10000 equation cause an ON ERROR 


contains no branches to comments, 
three common math problems: illegal 


1640. Incidently, since the program 
GOTO branch to line 2100; 


program grinds slowly on, minute by 
program anyway, simply delete line 


tween -2 and 2—it 


"oar hue 
sss fob 


THE POINTING FINGER 


Remember how we scaled the hor- 
izontal x values by dividing the dif- 
ference in extremes by 239, which 
was one less than the number of pix- 
els? Well, we can similarly scale the 
vertical y values, by dividing by 63 
on the Model 100 and Tandy 102, 


and 127 on the Tandy 200. How do 
we know which is which? Line 1070 


200” 


saying that the computer model used 


is the Tandy 200. If your machine is 


“MD 


enter that value. The 


contains a statement, 


a 100 or 102 
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1926 ' 
1930 FOR L=¢ TO 239 | 
1949 
1956 


NEXT L 


PSET (L, (ne m L)+ 


1L 
i 


* 


IF INKEY$-"" ‘THEN 1976 nas serve 


CLS 


PRINT ER$ . 
PRINT © 


RETURN 


' 


' Routine to hand errors. Tih 


PRINT CHRÉ (27) seres Gino 


id 
yy ient 


! Routine to | handle. eth 


"7144. 


TELH 


^ 
tint 
TIE 3111 
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IF ERR-5 THEN: Eh$- "illégal D 
ELSE IF ERR=6° THEN. iae Mosis by 
ELSE IF ERR=11- THEN ER$-"Division. I 
ELSE oai error: teni 


RESUME 2129 
ER$-ER$4", 
GOSUB 2616. i 
RETURN TIE 
2159: beet yaaa iu 
2160 ' Here' S the ni 
2174 ' 
19900 ¥=SQR( ABS( ( SIN 
19919 RETURN ii 


very next line uses a simple IF state- 
ment to set a vertical height (VH) to 
either 64 or 128 pixels, as appropriate. 
(Yes, it would have been even friend- 
lier to use exotic PEEKs to find out 
which machine we have—but not 
quite so obvious to someone trying 
to understand the program, or adapt 
it for another computer.) 

Graf’s line 1760 calculates the y 
values’ scaling increment, or YI. 
Next, the program displays the x and 
y extremes: XL, XH, YL and YH. If 
they look reasonable, pressing Enter 
starts the plot. Knowing the extremes 
gives you a frame of reference for 
understanding the plot, especially 
since the vertical and horizontal 
scales will probably be different. A 
45-degree line, plotted by the equa- 





tion y 2 x, looks like about 15 degrees 
when graphed on a Model 100; on 
a Tandy 200, it's about 28 degrees. 
Pay attention to the extreme values; 
any straight line with a slope greater 
than zero (in other words, going up) 
will be graphed from the lower left 
to upper right points on the LCD. 
Graf only shows you the shape of the 
graph, not its actual mathematical 
values. 

Upon entering the plotting subrou- 
tines, lines 1890 through 1980, Graf 
checks to see if the graph is a simple 
horizontal line by comparing YL and 
YH. If the two values are identical, 
there's no way the graph can be 
meaningful, so the plot is aborted 
with an appropriate message. 

Next, the horizontal and vertical 


axes are plotted if the x or y values 
span zero. How can you tell if the 
lower value of y, say, is less than or 
equal to zero, and the upper value is 
greater than or equal to zero? The 
obvious way is with a convoluted IF- 
THEN statement with lots of OR 
clauses. An easier way is to multiply 
the two values; if the result is non- 
positive, our graph can show the y 2 0 
axis. Lines 1910 and 1920 determine 
if an axis is appropriate, and if so, 
calculate its position and display it 
using the Model 100 BASIC LINE 
graphics statement. 

Finally, the display of the graph 
itself, taken care of by a FOR-NEXT 
loop at lines 1940-1960. For every x, 
the corresponding y, appropriately 
scaled, is retrieved from the Y array 
and plotted using the Model 100 
PSET statement. Adding one-half 
here and earlier compensates for the 
fact that PSET and LINE statements 
truncate their arguments: the vertical 
position 11.99, for example, is plotted 
as position 11, not 12. Adding .5 
changes the truncation to an up-and- 
down rounding, which is more ap- 
propriate in this situation. 

Notice that we subtract 63 (actually, 
VH-1) from our y coordinate. Why? 
Unlike the standard geometrical 
Cartesian plane, the Model 100's (0,0) 
origin is at the top left corner of the 
display, and the vertical pixels are 
numbered from the top down. Since 
all of our calculations assume the 
standard plane, numbered bottom 
up, subtracting from 63 effectively re- 
verses the values. 


READY TO ROLL 

My father-in-law enjoyed the pro- 
totype of this program; since then, 
Ive added some features, including 
the user menus (such as at lines 1310- 
1350), and the variable vertical height 
to accomodate the Tandy 200. The 
Graf program is essentially complete, 
and ready to be used for any number 
of applications: checking homework, 
examining experimental results, test- 
ing hypothesis. Since the actual 
mathematical function isn't limited to 
line 10000, you can use several lines 
with IF-THEN reasoning to construct 
your plot data points. It's also not 
impractical to replace line 10000 with 
a READ or INPUT statement, to 
scale plot any other x-y coordinate 
pairs. Master the possibilities! ] 
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Real Cheap Video 
for the Model 100 


An economical project with minimal sweat and. programming. 


ith few modifications 
and little money, you 
can display the image on 
your Model 100's LCD 
screen simultaneously on a CRT. 

For less than $200, I constructed a 
compact box featuring an existing ex- 
ternal port, no hardware modifica- 
tions on the 100, and minimal 
software programming (saving the 
100’s limited memory capacity for 
other uses). 

FROM MODEL 100/200 


36 PIN PARALLEL 
PRINTER CONNECTOR 


20 
21 
22 
23 
24 
25 
26 
27 
19 


2 
3 
4 
5 
6 
7 
8 
9 
1 


Ul 
TO GND J1 7404 


29 


- 
=- 


TO +5V J1 


TO U1 PIN 14 
(*5V 7404) 


TO GND J1 


TO Ul PIN 7 
(GND 7404) 


TO -12V J1 


By Greg Bouffard 


I used the Model 100's printer port 
because of its useful functions. The 
Print key lets you print any infor- 
mation from the LCD screen to the 
printer port. In TELCOM, F5 turns 
on the echo mode, and any infor- 
mation sent or received is also relayed 
to the printer port. 

All the normal printer functions 
used in BASIC, and most application 
software programs, are also available. 
Therefore, any information displayed 


STROBE OUT 


100K 


1N914 OR 
1N4148 


Figure 1. The Model 100/200 parallel printer to 65/9028 VT keyboard interface. 


PORTABLE 100 NOVEMBER 1987 


on the LCD screen can be sent via the 
printer port. 

To convert the information into dis- 
playable video, I designed a printer- 
interface-to-video-terminal keyboard 
interface converter (Fig. 1), hereafter 
called a keyboard interface. 

I used a Linger Enterprises Model 
65/9028 VT video terminal board, 
purchased from Digital Research 
Computers (P.D. Box 381450, Dun- 
canville, Tex. 75138). It is available 


TO Jl 
KEYBOARD 
CONNECTOR 
ON 65/9028VT 
VIDEO 
TERMINAL 
BOARD 


TO +5V J1 
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1N4006 





FILAMENT 
TRANSFORMER 
TRIAD F-40X 
OR EQUIVALENT 


1N4006 


Figure 2. The power supply schematic. 


unassembled for $99.95 or assembled 
and tested for $139.95. (If you are 
not an experienced kit-builder, I sug- 
gest you buy the ready-made version.) 


KEYBOARD MODIFICATION 

The 65/9028 is normally used with 
a CRT and ASCII keyboard to make 
a complete, ASCII, asynchronous ter- 
minal. However, I replaced the ASCII 
keyboard with the Model 100 and its 
keyboard interface circuit. This allows 
characters sent from the Model 100's 
printer port to be displayed on a CRT 
attached to the 65/9028. 

The keyboard interface circuit con- 
sists of an AY5-1013 UART, a 555 
timer, and 7404 hex inverter ICs plus 
support components. All parts are 
available from most local electronic 
suppliers or mail order supply cata- 









MODEL 100/200 

























logs. I selected components based on 
availability and price (approximately 


$15-$20). 











A data 


monitor is 
another useful 
feature of this 
“real cheap” 
video. 













Mount the components on a 3" by 
4" perforated circuit board using solid 
hook-up wire for all connections. 







36-PIN PARALLEL 
PRINTER CONNECTOR 


PRINTER TO 
_ KEYBOARD 
INTERFACE 


Figure 3. Connecting the keyboard interface and VT board to a monitor and power supply. 
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65/9028VT VIDEO 
TERMINAL BOARD 


Next, solder the wires directly to the 
legs of all ICs. If you’re not handy 
with a soldering iron, I recommend 
using IC sockets and soldering the 
connection to them. 

Use a 26-pin ribbon cable to con- 
nect the keyboard interface to the 
65/9028; power for the keyboard in- 
terface is supplied from the 65/9028 
through this cable. A 36-pin parallel 
printer connector is needed so you 
can use the standard Model 100 
printer interface cable to join the 100 
to the keyboard interface. | mounted 
the connector interface and all inter- 
face connectors in a 8.5" by 6" by 
2" metal box. 

My keyboard interface and 65/9028 
are supported by a power supply I 
constructed inside my CRT (Fig. 2). 
If the CRT does not have space avail- 
able, you can construct the power sup- 
ply in a separate box, or buy one ready- 
made. Make sure it has a rating of 
+5V at 2A and +12V and - 12V. 

The 65/9028 board comes with an 
excellent reference manual that gives 
detailed information about operating, 
assembling, and interfacing the board 
to a CRT and power supply. The 65/ 
9028 can be interfaced to many types 
of black-and-white monitors, using ei- 
ther composite video or separate 
video and synchronous inputs. 





TERMINAL BLISS 

I also connected a 25-pin ribbon 
cable to a 25-pin DB25 female RS- 
232 connector to J2 (the 65/9028's 
RS-232 I/O connector). This step is 
unnecessary if you want to display 











POWER 
SUPPLY 
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A joint PCSG/CRYPTRONICS project. 


Now you can access LUCID, DISK +, 
WRITE ROM, RAM 4 and others 
instantly. 


The 6 ROM BANK plus battery pack lets 
you have the ultimate Model 100 system. 
When you get your unit just press in up 
to 6 ROMS into the sockets then push in 
a simple plug into your Model 100's ROM 
socket. The ROM bank has two posts on 
either end that insert into the two little 
holes on the underside of your Model 100. 


The ROM bank props up the Model 100 at 
the same angle and height as those 
little legs you've seen. The ROM BANK 
itself is only about 1%” deep and it runs 
the width of your Model 100. It only weighs 
one pound. It not only installs instantly, 
but it pops free in a second if you need 
everything to lie flat in a briefcase. 





Change from ROM to ROM with the 
touch of a thumb switch. 


You can go from LUCID to WRITE to 
DISK + to any other ROMS just by turn- 
ing the thumb switch at the side of the 
ROM bank. The 6 ROM BANK is a sturdy 
well built construction that looks like it is 
a part of your Model 100. 


What is also fantastic is that the ROM 
bank has a powerful NICAD battery and 
recharger built right in. This power source 
supplies up to 30 hours of life to your 
Model 100 with just 6 hours of recharge. 
What's nice is that it recharges right from 
your Model 100's power adapter. This is 
a quick charge system and if you need 
power in a hurry, you can get 6 hours of 
life for your Model 100 by just charging for 
an hour and half. 


PORTABLE CONRUTER SUPORT ORUP 


11035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 
VISA / MASTER CARD / AM. EXP. / C.O.D. 
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plus powerful Nicad 
battery pack that gives 
30 hours of power 

to your Model 100 





Suddenly, the Model 100 is a very 
powerful computer. 


If you have the HOLMES portable disk 
drive with its powerful bundled database 
software package or the CRYPTRONICS 
128K RAM expansion along with LUCID, 
WRITE ROM and DISK + in the 6 ROM 
bank with its rapid rechargable NICAD 
power source, you have the ultimate port- 
able system. It's all available only from 
PCSG. 


As usual we don't want you to take our 
word for it. The 6 ROM BANK is sold on 
a 30 day trial. If you are not satisfied 
simply return within thirty days for a full 
refund. MC, VISA, AM. EX. or C.O.D. 


1-214-351-0564 








Give A Gift That 
Will Be Opened 


Every Month 


Why give a present that will be opened 
just once when you can give one that will 
be opened year-round? You'll be remem- 
bered this season, and every season, 
when you send the perfect gift for Tandy 
users—an 80 Micro subscription. 

Month after month, 80 Micro will be a 
valuable, practical, and sometimes surpris- 
ing guidebook for the dedicated Tandy 


user. And for an incredibly low price, it of- 


fers more assistance and inspires more ef- 


ficiency than most peripherals and software 


packages. Just look at the benefits: 


lll Shop-at-home convenience with concise 
new product information. 
@ Answers to both common and unusual 


YES! | Want To Give A Year-Round Gift. 
Please send an 80 Micro gift subscription to the person listed 
below. I'll pay $24.97 for 12 issues—a 48% savings. 


O Bill me after the holidays! 


Q Payment Enclosed 
Please make checks payable to 80 Micro. 


Name of Gift Recipient 





Address 

City _________ State Zip 
My Name 

Address 

Cy, inl Zip 





Canada $45.97 (Canadian Funds), Mexico $29.97, Foreign Surface $44.97, 1 year only, kO S 
US Funds drawn on US Bank. Foreign Airmail please inquire. All gift subscriptions will 


begin with the first available issue in 1988. 





80 Micro * PO Box 981 * Farmingdale, NY 11737 


computing problems in "Feedback 
Loop”. 

li Thorough evaluations and quality ratings 
of the latest Tandy-compatible products. 


Plus, a variety of type-and-run program list- 
ings, up-to-the-minute industry trends, and 
much more. 

All in the only system-specific source on the 
market for Tandy users. 

All for just $24.97—12 issues at 48% off 
the cover price. And you won't be billed until 
after the holidays. 

Send an All Seasons Greetings to someone 
special this season by returning the coupon, 
or by calling 1-800-258-5473. (In NH, dial 1- 
924-9471.) 
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CHIP-TOTE™ PCD-1 
For the: 

* TRS-80 Model 100, 200 

* NEC PC-8201, 8401 

* EPSON HX-20, PX-8 






Figure 4. The initialization program sets up the lead-in characters used to configure 


the 65/9028 VT board and sets the VT to local mode: Lamp hri 


shipping & handling 
per case in the 
continental U.S., 






video only from a Model 100, how- 
ever, the connector allows the Model 
100 to emulate an ANSI X3.64-1979 
(VT-100), a Heath H19 or an ADM- 
3A terminal. If you do not want this 
option, jumper pin 2 to 3 on J2. 
After you've finished, connect the 
keyboard interface and 65/9028 to a 
video monitor and power supply. 
When you turn on the unit, a cursor 
should be visible in the CRT's upper- 
lefthand corner. If not, turn off the 
unit, check all connections and jump- 
ers, and use the 65/9028's reference 












Ya can now 
use all Model 
100 printer 
functions to 
display LCD 


information. 





manual to determine the correct 
jumper configuration. 

Once the cursor appears on the 
CRT, use a standard Model 100 par- 
allel printer cable to connect the com- 
puter to the keyboard interface (Fig. 
3). Jumper pins 2 to 3 on the Model 
100's RS-232 port connector, and 
connect pins 2 and 3 of the 65/9028's 
RS-232 I/O port. Go to TELCOM 
and set the port status to any baud 
rate and parity. As a test, I set stats 
to STIE: 

Go to TERM and set up for full 
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duplex and echo on the 100’s key- 
board. Now, run the initialization 
program (Fig. 4), which sets up the 
lead-in characters used to configure 
the 65/9028 board and sets it to local 
mode. The lead-in character will now 
be Ctrl-C. 

Use Ctrl-C 1 to get to the 65/9028's 
setup status mode and set the auto 
linefeed to “on.” If necessary, refer to 
the manual for information on setting 
the terminal's setup status. 

You can now use all Model 100 
printer functions to display LCD in- 
formation on the CRT. 

A data monitor is another useful 
feature of this "real cheap" video pro- 
ject. While running the Model 100 
and the video in terminal mode, as 
described previously, the 65/9028 can 
be set to display characters received 
at its RS-232 port in hex. This func- 
tion can be useful when troubleshoot- 
ing communications problems between 
various PCs. Refer to the 65/9028's ref- 
erence manual for information on en- 
abling the display hex mode. 

If you are a frequent Model 100 
online user, just dial into the service 
using the Model 100's internal mo- 
dem with echo (F5) on. The CRT will 
display the data received and your 
keyboard responses. Since the CRT 
can display 80 characters by 24 lines 
of data, using these online services 
with the Model 100 and video unit 
will be much easier and more enjoy- 
able than using the LCD display. 

The "real cheap" video display unit 
should also work with a Model 200 
and any other computer having a 
standard parallel printer interface. 
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Checking It Twice 


There's nothing worse than a disk error. 


Click, click, clack. Whirr. Whirr- 
Whirr-Sputter. [Error reading drive.] 
Sigh. 


Ithough the Portable Disk 

Drive (PDD), thanks to its 

3.5-inch technology, is a 

very reliable Model 100- 
family accessory, problems with phys- 
ically or logically-damaged disks can 
occur. And when they do, nobody’s 
happy. 

I spend a fair amount of time on 
the road and always travel with my 
Model 100 and PDD. When I return 
to the office, I unload my document 
files onto my MS-DOS desktop using 
Traveling Software's LapDOS. I find 
the combination pretty near perfect. 

One potential problem has nagged 
at me since my very first PDD- 
equipped field trip: what if my disk 
is defective? 

Due to circumstances, it's difficult 
to double-check the file on disk, since 
one of my short stories or articles will 
occupy more than half of my avail- 
able RAM (32K). There simply isn't 
enough memory remaining in RAM 
to pull the saved file back into the 
Model 100 before killing the original 
file. Backing up the file to a second 
disk (which I routinely do) is not 
foolproof, as mistakes or equipment 
malfunction can easily produce two 
bad disk files. 

Although my laptop system has al- 
ways performed flawlessly, the 
thought of losing a week's work gives 
me the jitters each time I have a work 
session in a hotel room, without a 
printer to make a printed backup. 
Hence my solution: a program that 
allows me to take a look at a file on 
a disk without fully loading it into 
RAM. The program itself only oc- 
cupies 747 bytes within the Model 
100 or Tandy 200; it opens a file and 
loads it into memory a string at a 
time, using only a few bytes of mem- 
ory. I can read the disk-based article 


By Jim Gove 


on the screen, and catch any major 
errors. If I’m in a hurry, I can let the 
program do all the work and simply 
watch for hardware error-messages. 

The program is structured into four 
sections, a header section that con- 
tains the prompts, two functional sec- 
tions where the reading and screen 
printing takes place, and a final sec- 
tion where the file is closed and the 
program is exited. 

Two reading and screen printing 
sections are provided. One prints all 
F3 
H 
4 
i f 


aa 


of the text in the disk file. The second 
prints only the first significant string 
and the final string. The second sec- 
tion, (first and last) is fastest, and 
therefore is the one I usually use. A 
15,645-byte test file takes about 26 
seconds to display using the first-and- 
last method; it takes nearly four min- 
utes using the full-text testing. 

The program is a simple one, but for 
those who routinely produce large text 
files and then wonder if the load-to-disk 
has been successful, it's valuable. O 


jiii; 
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Going Round In Circles 


ore 


s we explored last month, 

the Model 100 offers rea- 

sonable bit-mapped graph- 

ics, with a 64-by-200 pixel 
(picture element) display. And the 
Tandy 200's offers twice the resolu- 
tion—128-by-200 pixels. We also in- 
troduced the happy blockhead, a 
simple graphics drawing created with 
the Model 100 and Tandy 200 built- 
in graphics commands (PSET, PRE- 
SET and LINE) This month, we'll 
use these same graphics statements, 
but show how computation can sig- 
nificantly extend the capacity of 
Model 100-series graphics. 


AROUND WE GO 

A graphics function found on many 
other microcomputers is circle, which 
draws circles on the computer display 
when given the center coordinates 
and a radius. But the Model 100 
doesn’t have a circle command. What 
to do? 

We can calculate a circle. A circle 
can be defined as all points in a plane 
a certain distance, r or radius, from 
another point, or center. Every point 
on the line is at a unique angle, rela- 
tive to the normal x—y coordinate sys- 
tem, from the center. Working back- 
wards, we can reason that if we gen- 
erate all possible angles, and plot a 
point one radius away from the center 
at those angles, we'll have a circle. 


A STEP AT A TIME 

Let's test our reasoning. First, we'll 
need a loop to generate angles. Since 
the Model 100 family of trigonometric 
functions (which we'll need) use ra- 
dian measure, a circle comprises 

2x 

or approximately 6.3 radians. For this 
test, we'll pick angles one-tenth ra- 
dian apart: . 
10 FOR A = 0 TO 6.3 STEP .1 

To find a point that's at distance 
radius from the center of a circle and 
angle a, the x-coordinate is sin(a)*radius 
and the y-coordinate is cos(a)*radius. 
If the center's not at location (0,0), 
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add the appropriate value to the x 
and y coordinate. Let's assume our 
radius is 30 pixels, and our circle's 
center is at (100,32). We'll add 0.5 to 
our center to account for the fact 
that the graphics commands only use 
the whole-number portions of argu- 
ments: 

20 PSET (30*SIN(A)  100.5,30*COS 
(A) + 32.5) 

Finally, let’s close off the loop by 
selecting the next angle: 
30 NEXT A 

Try the program. A circle will be 
drawn slowly on your laptop’s liquid 
crystal display. Well, almost a circle: 
It’s full of gaps. Obviously, our angles 
should be closer together than 0.1 
radians, but how close? 

The circumference, or distance 
around, a circle is 2 x m x the 
radius. In our example above, the 
circle with a radius of 30 pixels has 
a circumference of about 188 pixels. 





allo 


AM AID 





But our FOR-NEXT loop only iter- 
ated 64 times. That explains the prob- 
lem; for a circle this size, the STEP 
value should have been 0.033, which 
is 6.3 divided by 188. 

Reducing the fractions leaves the 
STEP value as simply the reciprocal 
of the radius: 

10 FOR A = 0 TO 6.3 STEP 1 / 30 

Try that version of the program; 
you'll find that the circle is now sol- 
idly complete. Change the radius 
value 30 in lines 10 and 20—you'll 
&till have a solid circle, which takes 
about 50 seconds to draw. 


SPEED AND GRACE 

Our little Model 100 is working 
very hard. For our radius-30 circle, 
the FOR-NEXT loop is iterating 190 
times, and we're performing 380 trigo- 
nometric calculations. Would you be- 
lieve that we can do the same task 
in a fraction of the time, with 24 











45 


MAXRAM 








| iterations and only 48 trigonometric 
calculations? 

A circle is mathematically sym- 
metrical. If we compute only the right 
side of the circle, we can easily—with 
simple subtraction— calculate the left 
side. Similarly, if we compute the up- 
per-right quadrant, we can very easily 
calculate the other three quadrants. 
Going one step farther, if we use trig- 
onometry to find the pixels for a mere 
one-eighth of the circle, we can find 
the remainder by using subtraction, 
and by swapping the sine and cosine 
values. 

That means we only need one- 
eighth the number of loop iterations, 
and if we store the intermediate re- 
sults, only one-eighth the number of 
sine and cosine function calls. This 
yields a drawing time of only eight 
seconds—instead of 50—for a radius- 
30 circle! 

Let's use this approach to write a 
subroutine to produce high-speed cir- 
cles. The variables cx and cy represent 
the coordinates of the circle's center, 





| 





erated angle, cs is the temporary an- 


gular sine multiplied by the radius, 
and cc is similarly the cosine multi- 
plied by the radius: 


10 CLS 

20 CX = 100 
30 CY = 32 
40 CR = 30 


60 IF INKEY$ = '" THEN 60 ELSE 
MENU 

999 ' Circle-drawing subroutine 

1000 FOR CA = 0 TO 0.79 + I/ 

CR STEP 1/CR 

1010 CS 1 = SIN(CA)*CR 4.5 

1020 CC = COS(CA)*CR 4.5 

1030 PSET (CX + CS,CY + CC) 

1040 PSET (CX-CS,CY + CC) 

1050 PSET (CX + CS,CY-CC) 

1060 PSET (CX-CS,CY-CC) 

1070 PSET (CX + CC,CY + CS) 

1080 PSET (CX-CC,CY + CS) 

1090 PSET (CX + CC,CY-CS) 

1100 PSET (CX-CC,CY-CS) 

1110 NEXT CA 

1120 RETURN 










The only substantive change is in line 
1000, the FOR statement. The TO 
value is 2 x m + 8, or 0.79—but 
the reciprocal of the radius is added 
in, to ensure that the eight arc sec- 
tions overlap slightly. 


HAPPY ROUNDHEADS 

To demonstrate the use of this cir- 
cle subroutine in conjunction with 
other graphics statements, let's turn 
last month's happy blockhead into a 
happy roundhead. The only change 
Ive made is to change the PSET 
statements in the circle subroutine to 
PRESETs to create a white circle. 
That, by the way, is one of my few 
criticisms of Microsoft's BASIC: why 
couldn't PSET work like LINE, and 
have a color argument? 


—Alan L. Zeichick 




















cr is the circle's radius, ca is the it- 
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Point of Sale Inventory Control 
System for the Model 100/102 


Keeps complete track 
of all sales, money & 
stock! Reads/writes gg 
barcode, generates 


reports and updates =& 
back office systems. 


INCLUDES ELECTRIC CASH DRAWER; 
RECEIPT, INVOICE, AND SALES 
REPORT PRINTER; NONVOLATILE 
BUBBLE MEMORY; AC AND NIC AD 

POWER SUPPLY; ALL IN HANSOME 

BLACK HOUSING WITH M100/2 ON 


ROTATING PEDESTAL 
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Find the memory 
in these pictures. 





IF YOU NEED MORE MEMORY, 
YOU NEED THE VAULT! 


The Vault adds as much as 1 megabyte of continuous RAM memory to the 
Tandy 102. With the Vault, you can maintain as many as 256 separate menu 
files (not just 19). It comes with four ROM sockets: 2 standard, 2 Radio Shack 
compatible. Adding only 3/8 inch of thickness, the Vault attaches firmly and -¢- 
easily with four screws. 


For pricing information and technical questions, call us today! 
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NEW PRODUCTS 


SAFE ROM 
HOLDER 


If your laptop application calls for 
more than one option ROM, check 
out SAFE. The latest offering from 
PG Design Electronics, SAFE is an 
electronically switchable, multiple- 
ROM bank for the Model 100, Tandy 
102 and 200, and NEC PC-8201 and 
PC-8300. 

SAFE, priced at $129, will hold as 
many as eight 32K ROMs, four 
Tandy-compatible and four industry- 
standard 27C256 ROMs in the Tandy 
version, and eight 27C256 in the 
NEC version. 

According to company President 
Peter Van Heusden, the electronic 
switching feature allows programming 
of custom 256K programs. PG Design 
Electronics assists users with the spe- 
cial programming of ROMs to take 
full advantage of SAFE's switching 
capabilities. 

The six-ounce, 11.5" by 2.75" by 
1" SAFE attaches to the bottom of 
the laptop and connects to the com- 
puter's external system bus port. 


Contact PG Design Electronics, 
37560 31 Mile Road, Richmond, MI 
48062, (313) 727-2744. 
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A NEW DOS 


When Tandy introduced its Porta- 
ble Disk Drive (PDD), several vendors 
responded with improved disk oper- 
ating systems (DOS) for the 3.5-inch 
drive. With the release of the im- 
proved PDD-2, with 200K storage per 
disk, some vendors again responded. 
Ultrasoft Innovation's latest product 


is Disk Power II. 

Disk Power II ($59.95) offers several 
improvements over the original Disk 
Power software. The new version can 
handle che PDD-2's larger 80-file ca- 
pacity by providing two 40-file disk 
subdirectories. Also, text being re- 
ceived via the laptop’s built-in 300- 
bps modem can be saved portion-by- 
portion to disk without dropping the 
telephone connection. 

Original Disk Power features are 
maintained with Disk Power II. There 
are rapid saves, loads or deletions of 
as many as 20 files in one operation, 
display of file size and available stor- 
age on-screen, and direct save and 
load of documents from TEXT. 

Enhancements to BASIC include 
functions to read and write sequential 
data files as large as 64K on disk. 
TELCOM is also enhanced with the 
added ability to view files while 
uploading, to enter BASIC or TEXT 
and to return to TELCOM without 
dropping the telephone connection. 

Contact Ultrasoft Innovations, 76 
Main St., Champlain, NY 12919, 
(514) 457-9293. 
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Model 100 Users Discover «INSTANT MS-DOS" 


With TELECOMMUTER' On Laptops & Desktops 


Free Demo Disk Convinces Doubters 


Weston, MA: Model 100 users planning to trade up to MS-DOS 
laptops like the Tandy 1400, IBM Convertible, Toshiba T3100, 
Zenith, Sharp and others have a big surprise coming. They al- 
ready know most of the commands they'll need to run the popular 
Telecommuter communications and word processing program on 
any MS-DOS laptop or desktop! 

Created by Sigea Systems, the ‘‘SO SIMPLE” software de- 
velopers from Weston, Massachusetts, Telecommuter is now 
available on 3.5** disks and employs the same basic command 
structure as the Model 100 laptop. 

Users will quickly find commands like Copy, Cut and Select 
right where they've always been on their Model 100. Load and 
Save are there, too, and they work with disk files and complete 
DOS directory trees. 

Telecommuter (TC Telcom) has Find, Call, Stat and Term in 
their old, familiar locations, and your ADRS.DO files will work 
perfectly on your MD-DOS laptop or desktop. 


Powerful Features Added 
In addition, Sigea has added powerful new features such as 


Search and Replace, many new printing options, plus file for- 
matting with headers, footers, pagination and justification. 

With the current version, TC also gives you a complete Address 
Database that allows your MS-DOS computer to make both voice 
and data calls and to keep a running call record in a note file 
attached to each address record in the data base. It also includes 
full Mail Merge capability. 


Host Mode for Office Communications 
Many Model 100 owners use Telecommuter's Host Mode to 
stay in touch with their office or home computer while on the 
road. Telecommuter works equally well with any MS-DOS lap- 
top. In addition, TC's Fast File Transfer moves files quickly be- 
tween your laptop and any MS-DOS computer via null modem 
cable. 


Free Demo Disk Available 
Model 100 users who would like to see for themselves how easy 
it is to use an MS-DOS laptop or desktop with Telecommuter are 
invited to call Sigea Systems at 617-647-1098 (or write Sigea at 19 
Pelham Road, Weston, MA 02193) for a Free Trial Disk con- 
taining the full Telecommuter program including the new TC Ad- 
dress Database. Be sure to specify 5%” or 34,” disks. 
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Tandy Computers: 
Because there is 
no better value. 


The Choice Is Yours 


The slimline Tandy 102 
= or the Tandy 200 with 
large flip-top screen. 


The Tandy® 102—only $499. This slim, light 
portable gives you complete computing power at 
a portable price. Its small size makes it ideal for 
people on the go. With five built-in programs, the 
Tandy 102 is ready to go to work right away. Use 
the 102 as a personal word processor, address/ 
phone directory, appointment calendar, telephone 
auto-dialer and modem. You can even write your 
own programs in BASIC. 


The Tandy 200—more power for only $799. It’s 
ideal for accountants, financial planners, or any- 
one who works with figures. You can perform 
sales forecasts, budgeting, pricing, engineering 
calculations and more. The Tandy 200 features 
BASIC programming language, a built-in direct- 
connect modem and a larger 40 x 16 display with 
double-height characters for maximum legibility. 
Built-in Multiplan™ makes spreadsheet analysis a 
snap. You also get an enhanced version of the 
Tandy 102’s word-processing program, as well as 
an appointment calendar, address-and-phone di- 
rectory, and telephone auto dialer. 


— ^ 


Need more storage? Add 
our battery-powered Port- 
|! able Disk Drive 2 for only 
| $199.95. You'll be able to 
i| store up to 200K of data 

on a standard 3!" disk. 
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Wake Up! BOOSTER PAK is Here! | 


Traveling Software introduces the BOOSTER 
PAK! An incredible breakthrough for Tandy 
Model 100/102 laptop computers. The 
BOOSTER PAK gives you an unprecedented 
2 megabytes of RAM memory and ROM 
software. At a very affordable price 
Flexible Design 

The BOOSTER PAK is designed to meet your 
needs now and in the future. You can 
customize it as you go. 

Easy Installation 
Just snap the BOOSTER PAK onto the 
bottom of your Tandy 100/102. Plug in two 
cables and you're in business 

Built-in Software 
Equally as incredible as the hardware is the 
built-in BOOSTER PAK software. Our unique 
virtual RAM disk software eliminates any 
need to do "bank switching: File subdirectories 
are supported for easy organization of your 
data. BASIC programs can access files as 
large as your RAM memory—up to two 
megabytes! We have also included our pop- 
ular TS-DOS disk operating system for use 
with the Tandy disk drive and our new Desk- 
Link software, as well as an XMODEM pro- 
gram to upload/download files up to 2 
megabytes directly to the virtual RAM disk. 
And to top it off, we have even included a 
fast action Asteroids game with amazing 
graphics in our standard BOOSTER PAK. 

The BOOSTER PAK 
Everything You Asked For and More! 





tow avai Sortware and ine draveling GOltware 


Ever Dream of a Faster Modem, Longer Battery Life, 
and All the RAM Memory 
ROM Software you want? 





and 








Here's what you 
get in a standard 
BOOSTER PAK for 
only $429: 
128K of RAM memory 
(96K available for files) 
64K of ROM software 
16 socketed slots for 
32K RAM and/or ROM 
software chips 
2 Tandy Molex ROM 
sockels 
Virtual RAM software 
(no bank swilching or 
copying) 
File folders/sub- 
directories supported 
TS-DOS disk software 
built-in 
XMODEM file upload/ 
downloading to virtual 
RAM 


Long-life lithium battery 
for RAM backup (rated 
at 7 years) 

BASIC programming 
access to virtual RAM 
ROM environment soft 
ware (mix and match 
any ROM software) 
Ability to develop ROM 
software from 32-480K 
in size 

Fast action Asteroids 
game (with great graph 
ics) buill-in 


BOOSTER PAK 
Options 
32K RAM (certified low 
power) chips ($20 ea.) 


6 slot RAM expansion 
board ($68) 


256K RAM expansion 


modules (requires expan- 


sion board) ($159 ea.) 



















Internal rechargeable 
nicad battery pak ($79) 


nternal 1200 baud 
Hayes-compatible 
modem ($199) 

BM Desk-Link software e 
(requires a serial cable) 
($39.95) 

Desk-Link null modem 
serial cable ($19.95) 


Sardine Plus word 
processing and spel 
ing checker 
($199.95) Four 
chip set includes 
complete Randorg 
House dic 
tionary 











Booster Pak. 








To order BOOSTER PAK call toll free 


1 800 343-8081 






